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Ven Zheng 


资深 作者 编 着 ， 图 书 质量 而 有 保证 


MATLAB 资 深 工程 师 执笔 ， 系 统 总 结 了 科学 计算 
的 实战 经 验 


提供 配套 源码 ， 便 于 读者 动手 实践 


理论 联系 实践 ， 本 书 提 供 源 代码 下 载 ， 方 便 读 者 
学 习 使 用 


内 含 丰 寅 实例 ， 利 于 读者 二 次 开发 

提供 了 几 十 个 科学 计算 的 典型 实例 ， 读 者 可 以 据 
此 二 次 开发 

提供 配套 课件 ， 便 于 教师 备课 使 用 


配套 提供 了 完整 的 教学 课件 资料 ， 便 于 广大 教师 
备 球 使 用 
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内 容 简 介 


本 书 以 最 新 推出 的 MATLAB R2016a 软件 为 基础 ,详细 介绍 了 各 科学 计算 求解 方法 及 其 
MATLAB 在 科学 计算 中 的 应 用 ,是 一 本 掌握 MATLAB 科学 计算 方法 的 综合 性 参考 书 。 全 书 以 科学 计 
算 在 MATLAB 中 的 应 用 为 主线 ,结合 各 种 应 用 案例 ,详细 讲解 了 科学 计算 的 MATLAB 实现 方法 ， 

全 书 分 为 MATLAB 基础 应 用 、 科 学 计算 和 工具 箱 等 三 部 分 , 共 17 章 。 基 础 应 用 部 分 详细 讲解 了 
MATLAB 的 计算 入 门 知识 .基本 运算 方法 .图 形 的 可 视 化 以 及 编程 方法 等 ,这 些 都 是 掌握 科学 计算 的 
必 备 知识 。 科 学 计算 部 分 详细 讲解 了 MATLAB 的 捅 值 拟 合 . 数 据 拟 合 、 微 分 方程 求解 .微分 方程 及 级 
数 .线性 方程 (组 ) 求 解 . 非 线 性 方程 (组 ) 求 解 . 常 微分 方程 (组 ) 求 解 、 概 率 统计 计算 、 偏 最 小 二 乘 应 用 分 
析 . 人 工 智能 算法 等 相关 知识 。 工 具 箱 部 分 介绍 了 模糊 逻辑 工具 箱 .优化 工具 箱 和 贪 征 分 方程 工具 箱 。 

本 书 按 逻 辑 编排 ,自始至终 采用 实例 描述 ; 内 容 完 整 且 每 章 相 对 独立 ,是 一 本 具有 较 高 参考 价值 的 
MATLAB 科学 计算 参考 书 。 

本 书 以 工程 应 用 为 目标 ,内 容 深 入 浅 出 ,讲解 循序 渐进 ,适合 作为 理工 科 高 等 院 校 研 究 生 、 本 科 生 
教学 用 书 , 也 可 作为 广大 科研 工程 技术 人 员 的 参考 用 书 。 


本 书 封面 贴 有 清华 大 学 出 版 社 防伪 标签 ,无 标签 者 不 得 销售 
版 权 所 有 ,侵权 必 究 。 侵权 举报 电话 : 010-62782989 13701121933 
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序言 


致力 于 加 快 工 程 技 术 和 科学 研究 的 步伐 一 一 这 句 话 总 结 了 MathWorks 坚持 超过 三 
十 年 的 使 命 。 

在 这 期 间 ,MathWorks 有 幸 见 证 了 工程 师 和 科学 家 使 用 MATLAB 和 Simulink 在 
多 个 应 用 领域 中 的 无 数 变 革 和 突破 :汽车 行业 的 电气 化 和 不 断 提高 的 自动 化 ;日 益 精确 
的 气象 建 模 和 预测 ;航空 航天 领域 持续 提高 的 性 能 和 安全 指标 ;由 神经 学 家 破解 的 大 脑 
和 号 体 奥秘 ;无 线 通 信 技 术 的 普及 ;电力 网 络 的 可 徘 性 等 等 。 

与 此 同时 ,MATLAB 和 Simulink 也 帮助 了 无 数 大 学 生 在 工程 技术 和 科学 研究 课程 
里 学 习 关 键 的 技术 理念 并 应 用 于 实际 问题 中 ,培养 他 们 成 为 栋梁 之 才 , 更 好 地 投入 科研 、 
教学 以 及 工业 应 用 中 ,指引 他 们 致力 于 学 习 、 探 索 先进 的 技术 ,融合 并 应 用 于 创新 实 
践 中 。 

如 今 ,工程 技术 和 科研 创新 的 步伐 令 人 惊叹 。 创 新 进程 以 大 量 的 数据 为 驱动 ,结合 
相应 的 计算 硬件 和 用 于 提取 信息 的 机 器 学 习 算 法 。 软 件 和 算法 几乎 无 处 不 在 一 一 从 该 
子 的 玩具 到 家 用 设备 ,从 机 器 人 和 制造 体系 到 每 一 种 运输 方式 一 一 让 这 些 系 统 更 具 功 能 
性 .灵活 性 、 目 主 性 。 最 重要 的 是 ,工程 师 和 科学 家 推动 了 这 些 进 程 ,他 们 洞悉 问题 ,创造 
技术 ,设计 单 新 系统 。 

为 了 文 持 创 新 的 步伐 ,MATLAB 发 展 成 为 一 个 广泛 而 统一 的 计算 技术 平台 ,将 成 熟 
的 技术 方法 (比如 控制 设计 和 信号 人 处理) 融入 令 人 激动 的 新 兴 领 域 ,例如 深度 学 习 、 机 可 
人 `、 物 联网 开发 等 。 对 于 现在 的 智能 连接 系统 ,Simulink 平台 可 以 让 您 实现 模拟 系统 , 优 
化 设计 ,并 上 自动 生成 租 人 入 式 代码 。 

“科学 与 工程 计算 技术 丛书 ”系列 主题 反映 了 MATLAB 和 Simulink 汇集 的 领 
域 一 一 大 规模 编程 .机 器 学 习 、 科 学 计算 .机 器 人 等 。 我 们 高 兴 地 看 到 “科学 与 工程 计算 
技术 从 书 ” 支 持 MathWorks 一 直 以 来 追求 的 目标 : 助 您 加 速 工程 技术 和 科学 研究 。 

期 待 着 您 的 创新 ! 


Jim lung 
MathWorks Fellow 


Fe PREFACE ES 


To Accelerate the Pace of Engineering and Sclence。 These eight words have 
summarized the MathWorks mission for over 30 years. 

In that time, it has been an honor and a humbling experience to see engineers and 
sclentists using MATLAB and Simulink to create transformational breakthroughs in an 
amazingly diverse range of applications: the electrification and increasing autonomy of 
automobiles; the dramatically more accurate models and forecasts of our weather and 
climates; the increased performance and safety of aircraft; the insights {rom 
neurosclentists about how our brains and bodies work; the pervasiveness of wireless 
communications; the reliability of power grids; and much more., 

At the same time, MATLAB and Simulink have helped countless students in 
engineering and science courses to learn key technical concepts and apply them to real 一 
world problems, preparing them better for roles in research, teaching, and industry. 
They are also equipped to become lifelong learners, exploring {or new techniques， 
combining them, and applying them in novel ways. 

Today, the pace of innovation in engineering and sclence ls astonishing. That pace 
is fueled by huge volumes of data, matched with computing hardware and machine 一 
learning algorithms for extracting information {rom it. lt is embodied by software and 
algorithms in almost every type of system - from children’” s toys to household 
appliances to robots and manufacturing systems to almost every {orm of transportation 
- making those systems more functional, tlexible, and autonomous. Most Important， 
that pace ls driven by the engineers and scientists who gain the insights, create the 
technologies, and design the innovative systems. 

To support today’s pace of innovation, MATLAB has evolved into a broad and 
unifying technical computing plattorm, spanning well 一 established methods, such as 
control design and signal processing, with exciting newer areas, such as deep learning, 
robotics, and IoT development. For today’s smart connected systems, Simulink is the 
platform that enables you to simulate those systems, optimize the design, and 
automatically generate the embedded code. 

The topics in this book series reflect the broad set of areas that MATLAB and 
Simulink bring together: large 一 scale programming, machine learnmng, scientific 
computing, robotics, and more. We are delighted to collaborate on this series, in 
support of our ongoing goal: to enable you to accelerate the pace of your engineering 
and scientific work. 


I look forward to the innovations that you will createl! 


Jim Tung 
MathWorks Fellow 
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在 科学 研究 和 工程 计算 领域 经 常会 遇 到 一 些 非常 复杂 的 计算 问题 ,这 些 问 题 利 用 计 
算 兹 或 手工 计算 无 法 完成 ,只 能 借助 计算 机 完成 ,而 MATLAB 在 数值 计算 方面 表现 里 
越 ,又 MATLAB 语言 具有 编程 效率 高 ,图形 界面 友好 ,全 方位 的 帮助 系统 、 扩 充 能 力 强 、 
交互 性 好 、 可 移植 性 强 等 特点 ,因此 ,MATLAB 广泛 应 用 于 各 行 各 业 。 

目前 ,MATLAB 已 成 为 数学 应 用 领域 的 重要 基础 课程 的 首选 实验 平台 ,而 对 于 学 生 
而 言 最 有 效 的 学 习 途 径 是 结合 专业 课程 的 学 习 掌 握 该 软件 的 使 用 与 编程 。 本 书 将 详细 
介绍 应 用 MATLAB R2016a 进行 科学 计算 的 实现 方法 。 


]. 本 书 特点 


由 浅 入 深 , 循 序 渐进 ; 本 书 以 MATLAB 爱好 者 为 对 象 ,首先 从 MATLAB 使 用 基础 
讲 起 ,再 由 简单 的 科学 计算 出 发 ,逐渐 过 渡 到 MATLAB 优化 设计 部 分 ,并 辅 以 工程 中 的 
应 用 案例 ,帮助 读者 快速 掌握 MATLAB 进行 科学 计算 与 优化 设计 和 开发 。 

步骤 详尽 ,内容 新 颖 : 本 书 结 合作 者 多 年 MATLAB 使 用 经 验 与 实际 工程 应 用 案例 ， 
将 MATLAB 软件 的 使 用 方法 与 技巧 详细 地 讲解 给 读者 。 本 书 在 MATLAB 进行 科学 计 
算 和 优化 设计 讲解 过 程 中 ,步骤 详尽 ,与 算法 理论 贴切 并 辅 以 实际 案例 为 背景 ,使 读者 在 
阅读 时 ,结合 程序 和 理论 ,从 而 快速 理解 理论 思想 ,并 掌握 该 理论 编程 方法 。 

实例 典型 ,轻松 易学 : 通过 学 习 实际 工程 应 用 案例 ,运用 MATLAB 科学 计算 求解 ， 
是 掌握 MATLAB 编程 应 用 最 好 的 方式 。 本 书 通 过 理论 联系 实际 案例 ,并 结合 编程 代 
码 , 透 彻 详 尽 地 讲解 了 MATLAB 在 科学 计算 和 数值 分 析 中 的 应 用 研究 。 


2. 本 书 内 容 


本 书 以 初中 级 读者 为 对 象 , 结 合 笔者 多 年 MATLAB 使 用 经 验 与 实际 工程 应 用 案 
例 , 将 MATLAB 软件 的 使 用 方法 与 技巧 详细 地 讲解 给 读者 。 本 书 基 于 MATLAB 
R2016a 版 ,详细 讲解 MATLAB 在 科学 计算 中 的 应 用 。 全 书 内 容 共 分 为 三 部 分 ,具体 
如 下 。 

第 1 部 分 : MATLAB 基础 应 用 部 分 。 详 细 讲 解 了 MATLAB 简介 、 基 本 运算 、 图 形 
的 可 视 化 以 及 编程 方法 等 ,这 些 都 是 掌握 科学 计算 的 必 备 知识 。 


第 1 章 MATLAB 简介 第 2 音 MATLAB 基本 运算 
第 3 半 MATLAB 图 形 可 视 化 第 4 章 MATLAB 编程 人 门 


第 2 部 分 : MATLAB 科学 计算 部 分 。 详 细 讲 解 了 MATLAB 的 插值 拟 合 .数据 拟 
合 、 微 分 方程 求解 .微分 方程 及 级 数 、 线 性 方程 (组 ) 求 解 、 非 线性 方程 (组 ) 求 解 、 常 微分 方 
程 (组 ) 求 解 , 概 率 统 计 计算 等 相关 知识 。 

第 5 和 曹 插值 拟 合 第 6 和 章 数据 拟 合 

第 7 革 微分 方程 求解 第 8 章 微分 方程 及 级 数 


第 9 章 线性 方程 (组 ) 求 解 第 10 章 非 线 性 方程 (组 ) 求 解 
第 11 章 ”党 微分 方程 (组 ) 求 解 第 12 章 ”概率 统计 分 布 计算 
第 13 章 ” 偏 最 小 二 乘 应 用 分 析 第 14 章 人 工 智 能 算法 


第 3 部 分 : MATLAB 工具 箱 。 详 细 讲 解 了 MATLAB 的 模糊 逻辑 工具 箱 、 优 化 工具 
箱 、 偏 微分 方程 工具 箱 等 相关 知识 。 

第 15 章 模糊 逻辑 工具 箱 第 16 章 优化 工具 箱 

第 17 章 偏 微分 方程 工具 箱 


3。 读 者 对 艰 


本 书 适合 于 MATLAB 初学 者 和 研究 算法 提高 并 解决 工程 应 用 能 力 的 读者 ,具体 说 
明 如 下 : 


。 相关 从 业 人 员 。 初学 MATLAB 科学 计算 的 技术 人 员 
。 大 中 专 院 校 的 教师 和 在 校生 。 相关 培训 机 构 的 教师 和 学 员 

。 广大 科研 工作 人 员 。 MATLAB 爱好 者 

4. 读者 服务 


为 了 方便 解决 本 书 疑 难 问 题 , 读 者 朋友 在 学 习 过 程 中 遇 到 与 本 书 有 关 的 技术 问题 
时 ,可 以 发 邮件 到 邮箱 caxart(@ 126. com ,或 者 访问 博客 http://blog. sina. com. cn/ 
caxart, 编 者 会 尽快 给 予 解 答 , 我 们 将 竟 诚 为 您 服务 。 

另外 ,本 书 所 涉及 的 素材 文件 (程序 代码 ) 已 经 上 传 到 为 本 书 提供 的 博客 中 , 供 读 者 
下 载 。 


5， 本 书 作 者 


本 书 主要 由 温 正 编著 。 此 外 , 付 文 利 、 王 广 、 张 岩 、 林 晓 阳 、 任 艳 芳 、 唐 家 鹏 、 孙 国 强 、 
高 飞 等 也 参与 了 本 书 部 分 内 容 的 编写 工作 。 

虽然 作者 在 本 书 的 编写 过 程 中 力求 叙述 准确 、 完 善 ,但 由 于 水 平 有 限 , 书 中 欠 受 之 处 
在 所 难免 ,希望 读者 和 同仁 能 够 及 时 指出 ,共同 促进 本 书 质 量 的 提高 。 

最 后 再 次 希望 本 书 能 为 读者 的 学 习 和 工作 提供 帮助 ! 


编 者 
2017 年 6 月 
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随 着 MATLAB 的 商业 化 以 及 软件 本 身 的 不 断 升 级 ,MATLAB 
的 用 户 界 面 也 越 来 越 精致 ,更 加 接近 Windows 的 标准 界面 ,人 机 交互 
性 更 强 ,操作 更 简单 。 而 且 新 版 本 的 MATLAB 提供 了 完整 的 联机 查 
询 、 帮 助 系统 , 极 大 地 方便 了 用 户 的 使 用 。 

本 章 简 单 介 绍 了 MATLAB 工作 环境 .图 形 绘制 和 帮助 系统 等 

学 习 目 标 : 

。 了 解 MATLAB 的 特点 ; 

。 就 悉 MATLAB 的 工作 环境 ; 

。 熟练 掌握 MATLAB 的 帮助 系统 。 


1.1 MATLAB 平台 简介 


MATLAB 语言 相对 于 传统 的 科技 编程 语言 有 诸多 的 优点 。 
1. 萄 用 性 


MATLAB 是 一 种 解释 型 语言 ;就 像 溃 种 版 本 的 Basic。 和 Basic 
一 样 , 它 和 个 单 易 用 ,可 和 直接 在 命令 行 窗口 输入 命令 行人 处 表达 式 的 值 ,也 
可 执行 预先 写 好 的 大 型 程序 。 

在 MATLAB 集成 开发 环境 下 ,程序 可 以 方便 地 编写 ,修改 和 调 
试 。 这 是 因为 这 种 语言 极 易 使 用 ,对 于 教育 应 用 和 快速 建立 新 程序 的 
原型 , 它 是 一 个 理想 的 工具 。 

许多 的 编程 工具 使 得 MATLAB 十 分 简单 易 用 。 这 些 工具 包括 
一 个 集成 的 编译 /调试 兹 ,在 线 文 件 手册 工作 人 台 和 扩展 范例 。 

2. 平台 独立 性 

MATLAB 支持 许多 的 操作 系统 ,提供 了 大 量 的 平台 独立 的 措施 。 
在 本 书 编写 的 时 候 , Windows 10 和 许多 版 本 的 UNIX 系统 都 支持 它 。 

在 一 个 平台 上 编写 的 程序 ,在 其 他 平台 上 一 样 可 以 正常 运行 ,在 
一 个 平台 上 编写 的 数据 文件 在 其 他 平台 上 一 样 可 以 编译 。 因 此 ,用 户 


人 这 4VTLV 其 国 波 


-~-MATLAB 科 学 计算 
可 以 根据 需要 把 MATLAB 编写 的 程序 移植 到 新 平台 。 
3。 预定 义 函 数 


MATLAB 带 有 一 个 极 大 的 预定 义 图 数 库 : 它 提供 了 许多 已 测试 和 打包 过 的 基本 工 
程 问题 的 图 数 。 例 如 ,假设 正在 编写 一 个 程序 ,这 个 程序 要 求 用 户 必 须 计 算 与 输入 有 关 
的 统计 。 

在 许多 的 语言 中 ,需要 写 出 所 编 数 组 的 下 标 和 执行 计算 所 需要 的 因数 .这 些 上 因数 包 
括 其 数学 意义 .中 值 .标准 误差 等 。 像 这 样 成 百 上 二 的 函数 已 经 在 MATLAB 中 编写 好 ， 
所 以 让 编程 变 得 更 加 简单。 

除了 植 人 MATLAB 基本 语言 中 的 大 量 函 数 ,还 有 许多 专用 工具 箱 , 以 帮助 用 户 解 
决 在 具体 领域 的 复杂 问题 。 例 如 :用户 可 以 购买 标准 的 工具 箱 以 解决 在 信号 处 理 、 控 制 
系统 .通信 图像 处 理 .神经 网 络 和 其 他 许多 领域 的 问题 。 


4. 机 制 独立 的 画图 


与 其 他 语言 不同 ,MATLAB 有 许多 的 画图 和 图 像 处 理 命 令 。 当 MATLAB 运行 时 ， 
这 些 标 绘图 和 图 片 将 会 出 现在 这 台 计 算 机 的 图 像 输 出 设备 中 。 此 功能 使 得 MATLAB 
成 为 一 个 形象 化 技术 数据 的 卓越 工具 ， 


5. 用 户 图 形 界 面 


MATLAB 人 允许 程序 员 为 他 们 的 程序 建立 一 个 交互 式 的 用 户 图 形 界 面 。 利 用 
MATLAB 的 这 种 功能 ,程序 员 可 以 设计 出 相对 于 无 经 验 的 用 户 可 以 操作 的 复杂 的 数据 


6. MATLAB 编译 器 


MATLAB 的 灵活 性 和 平台 独立 性 是 通过 将 MATLAB 代码 编译 成 设备 独立 的 P 代 
码 ,然后 在 运行 时 解释 代码 来 实现 的 。 

这 种 方法 与 微软 的 VB 相 类 似 。 不 幸 的 是 ,由 于 MATLAB 是 解释 型 语言 ,而 不 是 编 
译 型 语言 ,产生 的 程序 执行 速度 慢 ， 

如 今 的 MATLAB 已 经 不 再 是 仅仅 解决 矩阵 与 数值 计算 的 软件 ,更 是 一 种 集 数 值 与 
符号 运算 .数据 可 视 化 图 形 表示 与 图 形 界 面 设计 、 程 序 设计 、 仿 真 等 多 种 功能 于 一 体 的 集 
成 软件 。 

MATLAB 已 经 成 为 线性 代数 、 数 值 分 析 计 算 、 数 学 建 模 、 信 号 与 系统 分 析 、 自 动 控 
制 .数字 信号 处 理 、 通 信 系统 仿真 等 一 批 课程 的 基本 教学 工具 。 随 着 MATLAB 在 我 国 
高 校 的 推广 和 应 用 不 断 扩 大 ,MATLAB 逐渐 被 越 来 越 多 地 认识 和 使 用 . 


1.2 MATLAB R2016a 的 工作 环境 


在 一 般 情 况 下 ,可 以 使 用 两 种 方法 来 打开 MATLAB R2016a。 双 击 时 面 上 的 
MATLAB 图 标 ,打开 如 图 1-1 所 示 的 操作 界面 。 


图 1-1 MATLAB 操作 界面 的 默认 外 观 


如 采用 户 疫 有 添加 MATLAB 快捷 方式 , 则 需要 在 MATLAB 的 安 痛 文件 夹 里 (默认 
路 径 为 C:\Program Files\MATLAB\R2016b\bin\win32) 选 择 MATLAB. exe 应 用 程 
序 ,同样 可 以 打开 MATLAB 操作 界面 。 这 两 种 方法 的 结果 完全 相同 。 

MATLAB R2016a 延续 了 MATLAB R2015b 的 操作 界面 。 该 操作 界面 中 包含 大 量 
的 交互 式 界 面 , 如 通用 操作 界面 .工具 包 专 业界 面 . 帮 助 界 面 和 这 示 界 面 等 。 这 些 交 互 性 
界面 组 合 在 一 起 ,构成 MATLAB 的 默认 操作 界面 。 


1.2.1 命令 行 窗口 


在 MATLAB 默认 主 界面 的 右边 是 命令 行 窗 口 。 

顾名思义 ,命令 行 窗口 是 接收 命令 输入 的 窗口 ,但 实际 上 ,可 输入 的 对 象 除 
MATLAB 命令 之 外 ,还 包括 郴 数 .表达 式 .语句 以 及 M 文件 名 或 MEX 文件 名 等 。 为 叙 
述 方便 :这 些 可 输入 的 对 象 以 下 通称 语句 。 

MATLAB 的 工作 方式 之 一 是 在 命令 行 窗 口中 输入 语句 ,然后 由 MATLAB 逐 句 解 
释 执 行 并 在 命令 行 窗 口中 给 出 结果 。 命 令 行 窗 口 可 显示 除 图 形 以 外 的 所 有 运算 结果 。 
命令 行 窗 口 可 从 MATLAB 主 界 面 中 分 离 出 来 ,以 便 单独 显示 和 操作 。 当 然 , 也 可 重新 
返回 主 界面 中 ,其 他 窗口 也 有 相同 的 行为 。 

分 离 命令 行 窗 口 可 单 击 窗口 右上 角 的 辆 按钮 后 选择 Undock 选项 。 另 外 ,还 可 以 直 
接 用 鼠标 将 命令 行 窗口 拖 离 主 界面 :其 结果 如 图 1-2 所 示 。 若 将 命令 行 窗 口 返 回 到 主 界 
面 中 ,可 单 击 窗口 右上 角 的 由 按钮 后 选择 Dock 选项 。 

下 面 对 使 用 命令 行 窗口 的 一 些 相 关 问 题 加 以 说 明 。 


1. 命令 提示 符 和 语句 闫 色 


在 命令 行 窗口 ,每 行 语句 前 都 有 一 个 符号 ">>”, 此 即 命 令 提 示 答 。 在 此 符号 后 (也 只 
有 能 在 此 符号 后 ) 输 入 各 种 语句 并 按 Enter 键 , 方 可 被 MATLAB 接收 和 执行 。 执 行 的 结 来 
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通 第 束 了 且 接 显示 在 语句 下 方 , 如 图 1-3 所 示 。 


图 1-2 分 离 的 命令 行 窗 口 


图 1]-3 MATLAB 语句 运行 结果 


结果 等 采用 黑色 字体 ,字符 串 采 用 红色 ,if.,for 等 关键 词 采用 蓝 色 ,注释 语句 用 绿色 。 


2. 语句 的 重复 调用 、 编 辑 和 重 运 行 
命令 行 窗 口 不 仅 能 编辑 和 运行 当前 输入 的 语句 ,而 且 对 曾经 输入 的 语句 也 有 快捷 的 
方法 进行 重复 调用 、 编 辑 和 和 运行。 成功 实施 重复 调用 的 前 提 是 已 输入 的 语句 仍然 保存 在 
命令 历史 记录 窗口 中 (未 对 该 窗口 执行 清除 操作 )。 而 重复 调用 和 编辑 的 快捷 方法 就 是 
利用 表 1-1 所 列 的 键盘 按键 。 
表 1-1 语句 行 用 到 的 编辑 键 


键盘 按键 键 的 用途 键盘 按键 键 的 用 途 
L 向 上 回调 以 前 输入 的 语句 行 让 光标 跳 到 当前 行 的 开头 


y 向 下 回调 以 前 输入 的 语句 行 让 光标 跳 到 当前 行 的 末尾 


一 光标 在 当前 行 中 左 移 一 字符 删除 当前 行 光标 后 的 字符 


BackSpace 删除 当前 行 沧 标 前 的 字符 


人 光标 在 当前 行 中 右 移 一 字符 


其 实 这 些 按键 与 文字 人 处理 软 件 中 介绍 的 同一 编辑 键 在 功能 上 是 大 体 一 致 的 ,不 同 点 
主要 是 : 在 文字 处 理 软件 中 是 针对 整个 文 梢 使 用 :而 MATLAB 命令 行 窗 口 是 以 行为 单 
位 使 用 这 些 编辑 键 ,类 似 于 编辑 DOS 命令 的 使 用 手法 ，。 


3. 语句 行 中 使 用 的 标点 符号 


MATLAB 在 输入 语句 时 ,可 能 要 用 到 表 1-2 所 列 的 各 种 符号 。 在 回合 令 行 窗 口 输 
人 语句 时 .一 定 要 在 喘 文 输入 状态 下 输入 .尤其 在 刚刚 输 完 汉字 后 初学 者 很 容易 忽视 中 
更 文 输 和 人 状态 的 切换 。 
表 1-2 MATLAB 语句 中 常用 标点 符号 的 作用 


空格 | | 变量 分 隔 符 ; 矩阵 一 行 中 各 元 素 间 的 分 隔 符 ; 程序 诸 句 关键 词 分 隔 符 

逗号 “|  ， | 分 隔 欲 显示 计算 结果 的 各 语句 ; 变量 分 隔 符 ; 矩阵 一 行 中 各 元 素 间 的 分 隔 符 
点 号 “|  . ”| 数值 中 的 小 数 点 ; 结构 数组 的 域 访 问 符 

分 号 ”| ; ”| 分 隔 不 想 显示 计算 结果 的 各 语句 ; 矩阵 行 与 行 的 分 隔 符 

冒号 “|  : ”| 用 于 生成 一 维 数值 数组 ; 表示 一 维 数组 的 全 部 元 素 或 多 维 数组 某 一 维 的 全 部 元 素 
百 分 号 | % ”| 注释 语句 说 明 符 , 凡 在 其 后 的 字符 视 为 注释 性 内 容 而 不 被 执行 

单 引 号 | “” | 字符 申 标 识 符 

圆 括号 用 于 矩阵 元 素 引 用 ， 用 于 函数 输入 变量 列表 ; 确定 运算 的 先后 次 序 

方 括号 向 量 和 和 抢 阵 标识 符 ; 用 于 函数 输出 列表 

花 括 标识 细胞 数组 

续 行 号 | … | 长 命令 行 需 分 行 时 连接 下 行 用 

赋值 号 | 一 | 将 表达 式 赋值 给 一 个 变量 


4. 命令 行 窗口 中 数值 的 显示 格式 

为 了 适应 用 户 以 不 同 格式 显示 计算 结果 的 需要 ,MATLAB 设计 了 多 种 数值 显示 格 
式 以 供用 户 选用 ,如 表 1-3 所 示 。 其 中 ,默认 的 显示 格式 是 : 数值 为 整数 时 ,以 整数 显示 |; 
数值 为 实数 时 ,以 short 格式 显示 ; 如 果 数 值 的 有 效 数 字 超 出 了 这 一 范围 , 则 以 科学 计数 
法 显示 结果 。 


表 1-3 命令 行 窗 口中 数据 e 的 显示 格式 


格 式 | 命令 行 窗口 中 的 显示 形式 格式 效果 说 明 
short( 默 认 )》|2.7183 保留 4 位 小 数 , 整 数 部 分 超过 3 位 的 小 数 用 short e 格式 


用 1 位 整数 和 4 位 小 数 表 示 , 倍 数 关 系 用 科学 计数 法 表示 
成 十 进 制 指数 形式 


SW 2 7]83 保证 5 位 有 效 数字 ,数字 大 小 在 10 “一 10” 之 间 时 ,自动 调 
i | 整数 位 多 少 , 超 出 每 次 范围 时 用 short e 格式 


14 位 小 数 , 最 多 2 位 整数 , 共 16 位 十 进 制 数 ,否则 用 long e 
格式 表示 
2. 718281828459046e 十 000 115 位 小 数 的 科学 计数 法 表示 


short e 2.7183e 十 000 


long 2. 71828182845905 


long e 
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二 二 二 二， 二 二 一 ”二 -一 二 -二 -二 二 二 二 二 二 -二 二 二- 二 二 二 过- 二 二 二 二 -二 二 二 二 二 二 二 -二 二 二 二 二 二 二 二 二 -二 二 二 二 一 一 一 一 一 二 -二 二 二 -二 二 二 二 二 二 二 -二 二 二 -二 二 二 二 -二 二 -二 二 二 二 二 二 二 二 二 二 二 二 二 二 二 二 二 二 -二 二 二 二 过 二 二 二 -二 二 二 二 二 二 二 二 二 -二 二 二 二 二 二 二 二 -二 二 二- 二 二 二 二 二 -二 二 -二 二 二 二 二 二 二 二 一 二 
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格 式 | 命令 行 窗口 中 的 显示 形式 格式 效果 说 明 

保证 15 位 有 效 数 字 ,数字 大 小 在 10 “一 105 之 间 时 ,自动 调 
整数 位 多 少 ,超出 宕 次 范围 时 用 long e 格式 

rational 用 分 数 有 理 数 近似 表示 

hex 4005bfoa8b14576a 十 六 进 制 表示 

正 、 负数 和 零 分 别 用 十 一、 空格 表示 

bank 限 两 位 小 数 ,用 于 表示 元 、 角 ,分 

compact “| 不 留 空 行 显示 在 显示 结果 之 间 没 有 空 行 的 压缩 格式 

loose 留 空 行 显示 在 显示 结果 之 间 有 空 行 的 稀 朴 格式 


long g 2. 71828182845905 


需要 说 明 的 是 , 表 中 最 后 两 行 是 用 于 控制 屏幕 显示 格式 的 ,而 非 数 值 显 示 格 式 。 
MATLAB 所 有 数值 均 按 IEEE 浮 点 标准 所 规定 的 长 型 格式 存储 ,显示 的 精度 并 不 代表 
数值 实际 的 存储 精度 ,或 者 说 数值 参与 运算 的 精度 , 认 清 这 一 点 是 非常 必要 的 。 


5. 数值 显示 格式 的 设 定 方法 


格式 设 定 的 方法 有 两 种 : 一 是 单 击 MATLAB 窗口 中 的 国 国 加 按钮 ,用 弹出 的 对 话 杠 
去 设 定 ; 二 是 执行 format 命令 ,例如 要 用 long 格式 ,在 命令 行 窗 口中 输入 format long 语 
名 即 可 。 两 种 方法 均 可 独立 完成 设 定 ,但 使 用 命令 是 方便 在 程 厅 设计 时 进行 格式 设 定 。 
不 仅 数 值 显 示 格 云 可 由 用 户 目 行 设置 :, 数 字 和 文字 的 字体 显示 风格 .大 小 .颜色 也 可 
由 用 户 上 自行 挑选 。 其 方法 还 是 单 击 MATLAB 窗口 中 的 戎 本 日 按 钮 :弹出 如 图 1-4 所 示 对 
话 框 。 利 用 该 对 话 框 左 侧 的 格式 对 和 象 树 , 从 中 选择 要 设 定 的 对 象 骨 配合 相应 的 选项 , 便 
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图 1-4 Preferences 设置 对 话 框 


6. 命令 行 窗口 清 屏 


当 命 令 行 窗口 中 执行 过 许多 命令 后 ,窗口 会 被 占 满 。 为 方便 阅读 ,清除 屏幕 显示 是 
经 常 采用 的 操作 。 

清除 命令 行 窗口 显示 通常 有 两 种 方法 : 一 是 单 击 SEN 按钮 .然后 选取 下 
拉 菜 单 中 的 加 smendwndow 选项 ; 二 是 在 提示 符 后 直接 输入 clc 语句 。 两 种 方法 都 能 清除 
命令 行 窗口 中 的 显示 内 容 , 但 不 能 清除 工作 区 和 历史 命令 行 窗 口 的 显示 内 容 。 


1.2.2 命令 历史 记录 窗口 


命令 历史 记录 窗口 是 MATLAB 用 来 存放 壮 在 命令 行 窗口 中 使 用 过 的 语句 。 它 代 
用 计算 机 的 存储 冀 来 保存 信息 。 其 主要 目的 是 便于 用 户 奶 潮 、 查 找 置 经 用 过 的 语句 , 利 
用 这 些 始 有 的 资源 证 省 编程 时 间 。 

MATLAB 主 界面 中 的 命令 历史 记录 窗口 如 图 1-5 所 示 。 从 窗口 中 记录 的 时 间 来 
看 ,其 中 存放 的 正 是 置 经 使 用 过 的 语句 。 


Za, 34Y. 
mur (MN YY i) -rlabell x vlabell ss ), slabelt ss }' 
玫 才 下 二 而 必 下 = er 3 ) 


图 1-5 ”分离 的 命令 历史 记录 窗口 


对 命令 历史 记录 窗口 中 的 内 容 , 可 在 选中 的 前 提 下 ,将 它们 复制 到 当前 正在 工作 的 
傅 令 行 窗 口中 ,以 供 进 一 步 修 改 或 直接 运行 。 其 优 妇 在 如 下 两 种 情况 下 体现 得 尤为 明 
显 : 一 是 需要 重复 处 理 长 语句 ; 二 是 在 选择 多 行 置 经 用 过 的 语句 形成 M 文件 时 。 


1. 复制 .执行 命令 历史 记录 窗口 中 的 命令 


命令 历史 记录 窗口 的 主要 应 用 体现 在 表 1-4 中 。 表 中 “操作 方法 ”一 栏 中 提 到 的 “ 选 
中 ”操作 ,与 Windows 选中 文件 时 方法 相同 ,同样 可 以 结合 Ctrl 键 和 Shift 键 使 用 。 
表 1-4 命令 历史 记录 窗口 的 主要 应 用 
功 能 操作 方法 
选中 单行 或 多 行 语 句 , 执 行 Edit 菜单 中 的 复制 命令 , 回 到 命令 行 窗口 ,执行 
灯 贴 操作 ,有 即 可 实现 复制 
选中 单行 或 多 行 语 ji 右 击 ,弹出 快捷 菜单 ,执行 该 菜单 中 的 Evaluate 
执行 单行 或 多 行 语 句 Selection 命令 , 则 选中 语句 将 在 命令 行 窗口 中 运行 ,并 给 出 相应 结果 。 或 者 
nd 
选中 单行 或 多 行 语句 , 布 击 ,弹出 快捷 菜单 ,执行 该 菜单 中 的 Create MFFile 命 


也 多 行 语句 写成 M 文 作 
把 多 行 硬 条 号 成 M 文 件 | 和 ,利用 随 之 打开 的 M 文 件 编辑 /调试 器 窗口 ,可 将 选中 语句 保存 为 M 文件 


复制 单行 或 多 行 语句 


用 命令 历史 记录 窗口 完成 所 选 语句 的 复制 操作 : 
山 选中 所 需 第 一 行 ; 


户 订 4YVTLVYW 内 国内 


下 之 = 二 


------ MATLAB 科 学 计算 


按 Shift 键 和 鼠标 选择 所 宕 最 后 一 行 ,于 是 连续 多 行 即 被 选中 ; 

3 在 选中 区 域 单 击 鼠 标 右 键 ,执行 快捷 菜单 中 的 “复制 "全 令 ; 

回 到 命令 行 窗 口 ,在 该 窗口 用 快捷 菜单 中 的 Paste 命令 :所 选 内 容 即 被 复制 到 命 
令 行 窗 口 。 

其 操作 如 图 1-6 所 示 。 


图 1-6 命令 历史 记录 窗口 选中 与 复制 操作 


用 命令 历史 记录 窗口 完成 所 选 请 句 的 运行 操作 : 

J 选中 所 需 第 一 行 ; 

G 按 Ctrl 键 结 合 忌 标 选 中 所 需 的 行 , 于 是 不 连续 多 行 即 被 选中 ; 

G) 在 选中 的 区 域 右 击 , 弹 出 快捷 菜单 ,选中 Evaluate Selection 命令 ,计算 结果 就 会 
出 现在 命令 行 窗 口中 。 


2. 清除 命令 历史 记录 窗口 中 的 内 容 


清除 命令 历史 记录 窗口 内 容 的 方法 就 是 清除 命令 行 突 口 显 示 。 通 第 有 两 种 方法 : 一 
是 单 击 [按钮 ,然后 选取 下 拉 荣 单 中 的 昊 wm 选项 。 当 执行 上 述 命 令 后 ,命令 历 
史记 录 窗 口 当 前 的 内 容 就 被 完全 清除 了 :以 前 的 命令 册 不 能 被 退 测 和 利用 ,这 一 点 必须 


1.2.3 当前 文件 夹 窗口 和 路 径 管理 


MATLAB 借鉴 Windows 资源 管理 器 管理 磁盘 ,文件 夹 和 文件 的 思想 ,设计 丁当 前 
文件 夹 窗 口 。 利 用 该 窗口 可 组 织 、 管 理 和 使 用 所 有 MATLAB 文件 和 非 MATLAB 文件 ， 
如 新 建 . 复 制 、 删 除 和 重 命 名 文件 夹 和 文件 。 其 至 还 可 用 此 窗口 打开 编辑 和 运行 M 程序 
文件 以 及 载 入 MAT 数据 文件 等 。 当 然 , 其 核心 功能 还 是 设置 当前 目录 。 

当前 文件 夹 窗 口 如 图 1-7 所 示 。 下 面 主要 介绍 当前 目录 的 概念 及 如 何 完 成 对 当前 目 
录 的 设置 ,并 不 准备 在 此 讨论 程序 文件 的 运行 。 

MATLAB 的 当前 目录 即 是 系统 默认 的 实施 打开 .装载 .编辑 和 保存 文件 等 操作 时 的 
文件 夹 。 用 桌面 图 标 启 动 MATLAB 后 ,系统 默认 的 当前 目录 是 …NMATLABANwork。 
设置 当前 目录 就 是 将 此 默认 文件 夹 改 变 成 用 户 和 希望 使 用 的 文件 夹 , 它 应 是 用 户 准备 用 来 
存放 文件 和 数据 的 文件 夹 , 可 能 正 是 用 户 自己 有 意 提前 创建 好 的 。 

具体 的 设置 方法 有 两 种 : 

(1) 在 当前 目录 设置 区 设置 。 在 图 1-5 所 示 MATLAB 主 和 界面 工具 栏 的 右边 ,可 以 
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图 1-7 ”分离 的 当前 文件 夹 窗口 


在 设置 区 的 下 拉 列 表 文 本 框 中 直接 填写 竺 设置 的 文件 夹 名 或 选择 下 拉 列 表 中 已 有 的 文 
件 夹 名 ; 或 单 击 国 按 钮 ,从 弹出 的 当前 目录 设置 对 话 框 的 目录 树 中 选取 和 欲 设 为 当前 目录 
的 文件 夹 ，。 

《2) 用 命令 设置 。 有 一 组 从 DOS 中 借用 的 目录 命令 可 以 完成 这 一 任务 ,它们 的 语法 
格式 如 表 1-5 所 示 。 


表 1-5 几 个 常用 的 设置 当前 目录 的 命令 


cd 显示 当前 目录 cd 
cd 文件 夹 名 设 定 当前 目录 为 “文件 夹 名 ” cd f:\matfiles 


用 命令 设置 当前 目录 ,为 在 程序 中 控制 当前 目录 的 改变 提供 了 方便 ,因为 编写 完成 
的 程序 通常 用 M 文件 存放 ,执行 这 些 文件 时 是 不 便 先 退出 再 用 窗口 菜单 或 对 话 框 去 改变 
当前 目录 设置 的 。 


1.2.4 搜索 路 径 


MATLAB 中 大 量 的 图 数 和 工具 箱 文 件 是 组 织 在 硬盘 的 不 同文 件 夹 中 的 。 用 户 建 立 
的 数据 文件 \ 命 令 和 哺 数 文件 也 是 由 用 户 存放 在 指定 的 文件 夹 中 。 当 需要 调用 这 些 阴 数 
或 文件 时 ,找到 这 些 滑 数 或 文件 所 存放 的 文件 夹 就 成 为 首要 问题 ,路 径 的 概念 也 就 因此 
而 产生 了 了 。 

路 径 其 实 就 是 给 出 存放 某 个 待 查 哨 数 和 文件 的 文件 夹 名 称 。 当 然 , 这 个 文件 夹 名 称 
应 包括 盘 待 和 一 级 级 能 套 的 子 文件 夹 名 。 例 如 , 现 有 一 文件 lx04_01. m 存放 在 了 D 盐 
“MATLAB 文件 ”文件 夹 下 的 “M 文件 ?村 文 件 夹 下 的 “第 4 章 ? 子 文件 夹 中 ,那么 ,描述 它 
的 路 径 是 : D:\MATLAB 文件 \M 文件 \ 第 4 和 章 。 在 要 调用 这 个 M 文件 ,可 在 命令 行 窗 
口 或 程序 中 将 其 表达 为 : D:\MATLAB 文件 \M 文件 \ 第 4 章 \1x04_01. m 。 

在 实用 时 ,这 种 书写 因为 过 长 ,很 不 方便 ,MATLAB 为 克服 这 一 问题 ,引入 了 搜索 路 
径 机 制 。 设 置 搜索 路 径 机 制 就 是 将 一 些 可 能 要 被 用 到 的 果 数 或 文件 的 存放 路 径 提 前 通 
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知 系 统 ,而 无 须 在 执行 和 调用 这 些 困 数 和 文件 时 输入 一 长 串 的 路 径 。 

必须 指出 ,不 是 说 有 了 搜索 路 径 ,MATLAB 对 程序 中 出 现 的 符号 就 只 能 从 搜索 路 径 
中 去 查找 。 在 MATLAB 中 ,一 个 符号 出 现在 程序 语句 里 或 命令 行 窗 口 的 语句 中 可 能 有 
多 种 解读 , 它 也 许 是 一 个 变量 .特殊 常量 . 果 数 名 、M 文件 或 MEX 文件 等 ,到 底 将 其 识别 
成 什么 ,这 里 涉及 一 个 搜索 顺序 的 问题 。 

如 果 在 命令 提示 符 “>>” 后 输入 符号 xt, 或 程序 语句 中 有 一 个 符号 xt, 那 么 ， 
MATLAB 将 试图 按 下 列 次 序 去 搜索 和 识别 : 

(1) 在 MATLAB 内 存 中 进行 检查 搜索 ,看 xt 是 否 为 工作 区 窗口 的 变量 或 特殊 党 
量 ,如果 是 , 则 将 其 当成 变量 或 特殊 常量 来 处 理 , 不 再 往 下 展开 搜索 识别 。 

(2) 上 一 步 和 否定 后 ,检查 xt 是 否 为 MATLAB 的 内 部 函数 , 若 肯 定 , 则 调用 xt 这 个 内 
部 函数 。 

(3) 上 一 步 否 定 后 ,继续 在 当前 目录 中 搜索 是 否 有 和 名 为 xt. m 或 xt. mex 的 文件 存 
在 , 告 肯定 ,; 则 将 xt 作为 文件 调用 。 

(4) 上 一 步 否定 后 ,继续 在 MATLAB 搜索 路 径 的 所 有 目录 中 搜索 是 和 否 有 名 为 xt. m 
或 xt. mex 的 文件 存在 ,和 若 肯 定 , 则 将 xt 作为 文件 调用 。 

《5) 上 述 4 步 全 走 完 后 , 铬 仍 未 发 现 xt 这 一 符号 的 出 处 , 则 MATLAB 发 出 错误 信 
息 。 必 须 指出 的 是 ,这 种 搜索 是 以 花费 更 多 执行 时 间 为 代价 的 。 

MATLAB 设置 搜索 路 径 的 方法 有 两 种 : 一 种 是 用 菜单 对 话 框 ; 另 一 种 是 用 命令 。 


1. 用 菜单 对 话 框 设置 搜索 路 径 


在 MATLAB 主 界面 的 菜单 中 有 上 SEE 
对 话 框 ,如 图 1-8 所 示 。 


LL CUsers\fw\Documents\MATLAB 
DAProgram Files (x86MMATLAB\R2016a\toolbox\matlab\datafun 
D:\Program Files (x86NM\MATLAB\R2016a\toolboxw\matlab\datatypes 
DNAProgram Files (x86MMATLAB\R2016a\toolbox\matiab\elfun 
D:\Program Files (x86N\MATLAB\R2016a\toolbox\matlab\elmat 
DNAProgram Files [x88] MATLAB\R2016a\toolbow\matliabVMunfun 
DN\Program Files (x86N\MATLAB\R2016a\toolbox\matlab\general 
D:\Program Files (x86N\MATLAB\R2016a\toolbow\matiabVyofun 
DAProgram Files (x86\\MATLAB\R2016a\toolbox\matlab\lang 


图 1-8 设置 搜索 路 径 对 话 框 


对 话 框 左边 设计 了 多 个 按钮 ,其 中 最 上 面 的 两 个 按钮 分 别 是 :“ 浴 加 文件 严 …” 和”“ 诬 
加 并 包含 了 于 文件 夹 …”: 可 以 从 树 形 目录 结构 中 选择 欲 指定 为 搜索 路 径 的 文件 夹 。 

单 击 “ 评 加 文件 夹 … ”按钮 ,出现 如 图 1-9 所 示 的 添加 路 径 对 话 框 。 选 中 文件 夹 后 , 单 
击 “ 选 择 文件 夹 " 按 钮 ,选中 的 文件 夹 将 目 动 锌 加 和 人 到 搜索 路 径 中 。 
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appdata 2016/6/6 0:09 


bin 
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examples 2016/6/6 0:08 
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2. 用 命令 设置 搜索 路 径 


MATLAB 能 够 将 某 一 路 径 设 置 成 可 搜索 路 径 的 命令 有 两 个 : 一 个 是 path; 为 一 个 


2016/6/3 23:30 


图 1-9 添加 路 径 对 话 框 


是 addpath 。 

下 面 以 将 路 径 ~F:\、 MATLAB 文件 \M 文件 ”设置 成 可 搜索 路 径 为 例 ,分 别 子 以 
说 明 。 

用 path 和 addpath 命令 设置 搜索 路 径 。 

>> path(path, 'F:\ MATLAB 文件 \M 文 件 ); 区 begin 将 路 径 放 在 路 径 表 的 前 面 

>> addpath F:\MATLAB 文件 \M 文 件 一 begin 

>>addpath F:\MATLAB 文件 \M 文 件 -end 和 end 将 路 径 放 在 路 径 表 的 最 后 


1.2.5 工作 区 窗口 和 数组 编 秀 强 


在 默认 的 情况 下 .工作 区 窗口 位 于 MATLAB 操作 界面 的 左下 侧 : 单 击 目录 窗口 右 
上 方 的 国 按 钮 .可 以 查看 工作 区 窗口 的 详细 外 观 。MATLAB 主 界 面 中 的 工作 区 如 


1-10 所 示 。 


图 1-10 工作 区 
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MATLAB 某 单 栏 中 包含 有 PLOTS 图 形 选 项 菜单 选项 。 当 选中 工作 区 内 的 变量 且 
该 变量 至 少 包 含 两 个 数值 时 ,MATLAB 的 PLOTS 组 件 中 就 会 由 1-11(a) 变 为 1-11(b)， 
即 出 现 绘制 各 种 图 形 的 快捷 选项 供用 户 选 择 。 


ATLAB Rodihis 一 画 鞍 


(a) 未 选中 变量 时 的 PLOTS 选 项 


(b) 选中 变量 时 的 PLOTS 选 项 
图 1-11 图 形 选 项 菜单 


除了 非常 强大 的 绘图 功能 ,工作 区 窗口 还 有 许多 其 他 应 用 功能 ,如 内 存 变 量 的 查阅 、 
保存 和 编辑 等 。 所 有 这 些 操作 都 比较 简单 ,只 需要 在 工作 区 窗口 中 选择 相应 的 变量 ,人 然 
后 右 击 鼠标 ,从 弹出 的 快捷 全 单 中 选择 相应 的 全 单 选 项 即 可 ,如 图 1-12 所 示 。 

在 MATLAB 中 :数组 和 和 矩阵 都 是 十 分 重要 的 基础 变量 ,因此 MATLAB 专门 提供 数 
组 编辑 器 这 个 工具 来 编辑 数据 。 右 击 工 作 区 窗口 中 任意 一 个 数组 ,然后 从 弹出 的 快捷 某 
单 中 选择 “打开 所 选 内 容 ” 命 令 ,或 者 直接 双击 该 变量 ,就 可 以 打开 该 变量 的 数组 编辑 需 ， 
如 图 1-13 所 示 。 


图 1-12 修改 变量 名 称 图 1-13 图 1-12 中 变量 a 的 数组 编辑 器 
用 户 可 以 在 数组 编辑 如 中 直接 编辑 该 变量 。 对 于 大 型 数组 ,使 用 数组 编辑 融会 给 用 
户 审 来 很 大 的 便利 。 


1.2.6 变量 的 编辑 命令 


在 MATLAB 中 ,用 户 除 了 可 以 在 工作 区 窗口 中 编辑 内 存 变 量 之 外 ,还 可 以 在 
MATLAB 的 命令 行 窗口 输入 相应 的 命令 ,查阅 和 删除 内 存 中 的 变量 。 下 面 用 简单 的 案 
例 ,说 明 如 何在 命令 行 窗 口中 对 变量 进行 操作 。 


【 例 1-1】 在 MATLAB 命令 行 窗 口中 查阅 内 存 变量 。 
具体 步骤 如 下 : 
在 命令 行 窗口 中 输入 who 和 whos 命令 ,查看 内 存 变 量 的 信息 ,如 图 1-14 所 示 。 
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double 
double 
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图 1-14 查阅 内 存 变量 的 信息 
需要 注意 的 是 ,who 和 whos 命令 适用 于 MATLAB 各 种 版 本 ,两 个 命令 的 区 别 只 在 
于 内 存 变 量 信息 的 详细 程度 。 两 个 命令 结果 的 列表 次 序 随 具体 情况 而 不 同 。 
【 例 1-2】 在 例 1-1 之 后 ,在 MATLAB 命令 行 窗口 中 删除 内 存 变量 b。 
在 命令 行 窗 口中 输入 下 面 命 令 行 : 


>> Clear b 
2 Who 


得 到 的 结果 如 图 1-15 所 示 。 


图 1-15 删除 内 存 变量 


和 前 面 的 例子 相 比 ,用 户 可 以 看 出 , 当 用 户 运 行 clear 命令 后 ,将 b 变量 从 工作 区 删 
除 :而 且 在 工作 区 窗口 中 也 将 该 变量 删除 。 


1.2.7 在 取 数 据 文件 


在 MATLAB 中 ,提供 save 和 load 命令 来 实现 数据 文件 的 存 取 。 表 1-6 列 出 了 命令 
的 常见 用 法 。 
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表 1-6 MATLAB 文件 存 取 的 命令 


命 令 功 能 
save Filename 将 工作 区 中 的 所 有 变量 保存 到 名 为 Filename 的 MAT 文件 中 
save Filename x yz 将 工作 区 中 的 xyy*z 变 量 保存 到 名 为 Filename 的 MAT 文件 中 
将 工作 区 中 符合 表达 式 要 求 的 变量 保存 到 名 为 Filename 的 MAT 
save Filename -regecp patl pat2 | 
文件 中 
load Filename 将 名 为 Filename 的 MAT 文件 中 的 所 有 变量 读 入 内 存 
load Filename x yz 将 名 为 Filename 的 MAT 文件 中 的 x,y,z 变 量 读 和 人 内存 
load Filename -regecp patl pat2 | 将 名 为 Filename 的 MAT 文件 中 符 台 表达 式 要 求 的 变量 读 和 人 内存 
load Filename x y z -ASCII 将 名 为 Filename 的 ASCII 文件 中 的 x,y,z 变量 读 入 内 存 


表 1-6 中 列 出 了 几 个 常见 的 文件 存 取 命 令 , 用 户 可 以 根据 需要 选择 相应 的 存 取 命 令 ; 
对 于 一 些 较 少 见 的 存 取 命 令 , 用 户 可 以 查阅 MATLAB 帮助 。 

在 MATLAB 中 ,除了 可 以 在 命令 行 窗口 中 输入 相应 的 命令 之 外 ,也 可 以 在 工作 区 
中 选择 相应 的 按钮 ,实现 数据 文件 的 存 取 工作 。 例 如 ,用 户 可 以 右 击 工作 区 窗口 中 变量 ， 
从 弹出 的 快捷 菜单 中 选择 “另存 为 …” 命 令 将 所 选中 的 变量 保存 到 指定 的 文件 夹 ,如 
图 1-16 所 示 。 
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plotimfip1) 
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arealmfp1) 
Pie(tmfp1) 
histogram(mfp1) 
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图 1-16 保存 变量 


”11.3 MATLAB 图 形 绘制 


图 形 绘 制 是 MATLAB 的 主要 特色 之 一 。MATLAB 图 形 绘制 指令 有 具有 自然 ,简捷 、 
灵活 及 扩充 的 特点 。MATLAB 的 指令 很 多 ,例如 在 同一 坐标 下 绘制 多 条 曲线 ,编程 
如 下 : 


clc,clear,close all 
t=0:pi/50:4 * pi:; 

Ml a 

v= exp( -七 /3). x sin(3 x t); 
plotlt,y,t,yY0,t, ~ yo0); 
grid on 


运行 程序 ,输出 结果 如 图 1-17 所 示 。 


图 1-17 同一 坐标 系 绘制 多 条 曲线 


对 于 分 接 和 矩阵 图 形 的 绘制, MATLAB 工具 箱 提 供 所 对 应 的 图 的 限 数 为 gplot (A， 


xy) 。 其 中 ,A 表示 图 的 邻接 矩阵 ; xy 表示 图 的 每 一 个 项 点 的 坐标 。 


具体 MATLAB 程序 如 下 : 


A=[0101;1010;0101;1010]; 外 定义 含有 四 个 顶点 的 图 的 人 鲜 接 和 矩阵 
rl 和 21 3 291 第 四 个 顶点 的 坐标 分 别 为 (1,3), (2,1),(3,3), (2,5) 
gplot(A, xy); 


运行 程序 ,输出 结果 如 图 1-18 所 示 。 
5.0[ 
4.5 


4.0 | 


EO 12 Ed4 16 18 20 22 24 26 28 3.0 
图 1-18 连接 矩阵 图 
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1.4 MATLAB 的 帮助 系统 


MATLAB 拥有 非常 完善 的 带 助 系统 ,在 学习 MATLAB 的 过 程 中 ,用 户 必 须 丈 练 等 
握 MATLAB 帮助 系统 。 

MATLAB 帮助 系统 大 体 上 包括 三 种 : 联机 帮助 系统 、 命 令 窗 口 查询 帮助 系统 和 联 
机 演示 系统 。 下 面 分 别 介 绍 这 三 种 帮助 系统 。 


1.4.1 联机 帮助 系统 


MATLAB 的 联机 帮助 系统 最 为 全 面 ,; 单 击 “ 主 页 ”功能 区 的 疼 按 钮 即 可 进入 
MATLAB 的 联机 帮助 系统 ,如 图 1-19 所 示 。 


我 们 为 许可 用 户 提供 了 有 美 MATLAB 的 中 文 文 情 。 近 些 用 户 可 
机 | : 


1 在 MATLAB 帮 动 到 览 导 中， 点击 “ 十 设 项 ”国标 ,在 出 现 站 


轩 ” 柄 他 下 第 得 “在 mathworkscom 网 站 上 要 要 Intermet 
组 “ 苘 体 中 挛 ” 。 

2) 通过 于 综 至 导 的 剂 生 前 访问 Www.rmathwarks earrwyhelP，/ 
中 族 职 “中国” . 航 大 才能 硬 辣 中 廊 内 突 . 


MATLAA 
Sri ini 
Aerospace Blockset 
herospace Toolbar 


图 1-19 联机 帮助 系统 


在 寄 口 的 文本 框 中 输入 竺 查询 的 字符 ,使 可 显示 相关 条 目 , 如 图 1-20 所 示 。 用 户 还 
可 以 单 击 喜 “ 收 乡 夹 "选项 将 当前 的 带 助 页 面 加 入 收 续 : 方 合用 户 日 后 查询 。 
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图 1-20 ”plot 函数 查询 


1.4.2 命令 窗口 查询 帮助 系统 


通过 命令 窗口 查询 帮助 系统 可 以 在 命令 窗口 中 快速 查询 相关 帮助 。 第 用 的 帮助 命 
令 如 表 1-7 所 示 。 
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表 1-7 常用 的 帮助 命令 

命 令 功 能 
help 显示 当前 帮助 系统 中 包含 的 所 有 项 目 
help 十 函数 名 /类 名 显示 函数 /类 的 相关 信息 
lookfor 十 关键 字 显示 包含 关键 字 的 函数 /类 的 所 有 项 目 
what 显示 当前 目录 中 MATLAB 文件 列表 
who 显示 工作 区 间 中 所 有 变量 的 列表 
whos 显示 工作 区 间 中 变量 的 详细 信息 


1.4.3 联机 滥 示 系统 


联机 演示 系统 提供 给 MATLAB 初学 者 一 个 演示 学 习 的 平台 ,在 命令 行 窗口 输入 
demo 或 demos 即 可 进入 MATLAB 和 帮助 系统 的 主演 示 由 面 ,如 图 1-21 所 示 。 
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图 1-21 MATLAB 自 带 实例 


单 击 相应 的 实例 资源 即 可 进入 具体 的 演示 界面 ,如 图 1-22 所 示 为 选择 Graphics_> 
3-D Plots 实例 资源 的 情形 ，。 
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本 章 小 结 


基于 MATLAB 的 科学 计算 ,能 够 灵活 运用 于 各 行 各 业 。 针 对 问题 本 身 . 用 户 可 以 
根据 目 喘 需求 ,进行 程序 的 编写 ` 图 形 的 绘制 和 函数 调用 ,MATLAB 对 于 和 矩阵 的 运算 表 
现 极 好 的 运算 能 力 。 


本 章 主 要 介绍 了 MATLAB 基本 运算 ,分 别 介 绍 了 MATLAB 的 
数据 类 型 .矩阵 运算 .关系 运算 和 逻辑 运算 、 多项式 运算 .符号 运算 、 复 
数 运 算 等 。 通 过 本 章 的 介绍 ,读者 能 够 熟悉 掌握 MATLAB 编程 思 
路 ,从 而 能 对 MATLAB 的 运算 功能 有 一 个 全 面 的 认识 ,开始 
MATLAB 编程 之 路 。 

学 习 目 标 : 

。 熟练 掌握 MATLAB 算 阵 的 表示 方法 ; 
熟练 运用 和 矩阵 变换 和 运算 求解 实际 物理 模型 ; 

。 熟练 掌握 MATLAB 编程 技巧 等 。 


2.1 MATLAB 的 数据 类 型 


MATLAB 数据 类 型 的 最 大 特点 是 每 种 类 型 的 数据 都 是 以 和 矩阵 的 
形式 存在 的 。MATLAB 常用 的 数据 类 型 包括 数值 型 .字符 型 .元 胞 数 
组 .结构 体 和 函数 句柄 等 ,其 中 数值 型 又 包括 双 精 度 类 型 . 单 精 度 类 型 
和 整 型 。MATLAB 支持 不 同 数据 类 型 间 的 转换 ,增加 了 数据 处 理 的 


2.1.1 变量 和 常量 


1. 变量 


变量 是 任何 程序 设计 语言 的 基本 元 素 之 一 。 相 比 C\Fortran 语言 
等 其 他 高 级 语言 ,MATLAB 在 变量 声明 方面 要 求 并 不 严格 ,其 变量 无 
须 事先 声明 ,也 不 需要 指定 变量 类 型 ,MATLAB 会 自动 根据 变量 的 赋 
值 与 其 相关 操作 来 确定 变量 的 类 型 。 

MATLAB 变量 的 命名 规则 有 如 下 三 种 : 

《1) 变量 名 区 分 大 小 写 。 

(2) 变量 名 必须 以 字母 开头 ,可 包含 字母 (大 小 写 )、 数 字 和 下 
国 线 。 

(3) 变量 名 长 度 不 超过 63 个 (MATLAB 6. 5.1 以 上 版 本 ) 。 
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2. 第 量 
MATLAB 中 存在 一 些 预 定义 的 特殊 变量 , 称 为 当量 。 常 用 的 MATLAB 管 量 如 
表 21 所 示 。 


表 2-1 MATLAB 常用 常量 


常量 说 有 明 说 明 


和 浮 点 运算 的 相对 精度 
四 最 大 的 正 实数 

Inf 最 小 约 正 实数 

NaN ans 默认 变量 名 


在 MATLAB 中 ,定义 变量 时 应 避免 与 常量 名 相同 ,以 免 改 变 常 数 的 值 ,为 计算 带 来 不 便 ， 
【 例 2-1〗 在 MATLAB 命令 窗口 输入 命令 如 下 : 


-> 它 忆 全 
>> pl 


运行 程序 ,输出 结果 如 下 : 


2.2204e— 16 
>> pi 
ans = 
3.1416 


2. 1.2 数值 型 数据 


MATLAB 数值 型 数据 包括 整数 (有 符号 和 无 符号 ) 和 浮 点 数 ( 单 精度 和 双 精 度 )， 
表 2-2 列 出 了 数值 型 的 不 同 格式 。 需 要 注意 的 是 ,在 默认 状态 下 ,数据 类 型 默认 为 双 精 度 
的 浮 点 数 。 


表 2-2 数值 型 


表示 范围 


— 0128 91% 0—126, 9128 


数 值 型 
i 
16 位 有 符号 整数 = 
32 位 有 符号 整数 二 于 一 2 一 ] 
救 型 64 位 有 符号 整数 一 28 一 26 一 ] 
下 8 位 无 符号 整数 | 
64 位 无 符号 英 红 0 二 2 一 


1. MATLAB 的 数值 精度 


MATLAB 所 能 表示 的 最 小 实数 称 为 MATLAB 的 数值 精度 ,在 MATLAB7 以 上 版 
本 中 :MATLAB 的 数据 精度 为 2 ““ ,任何 绝对 值 小 于 2 “的 实数 ,MATLAB 都 将 其 
视 为 0。 

【 例 2-2〗 MATLAB 的 数值 精度 。 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


>>x=2^(— 1074) 
>>x=2^(— 1075) 


2 行程 友 ， 输出 2 结果 如 下 : 


>> X=2^(— 1074) 
Xx 二 

4.9407e— 324 
>> x=2^(- 1075) 
Xx 一 


0 


由 例 2-2 可 知 ,2 "二 2 MX, MATLAB 可 以 表示 2 ,但 将 2 -2075 视 为 0。 因 
此 MATLAB 程序 在 判断 某 个 实数 是 否 为 0 时 ,最 可 徘 的 we 
于 2 ”: 但 实际 上 并 不 一 定 要 与 2 ”“ 相 比较 。 针 对 不 同 精 度 需求 的 问题 ,可 以 使 用 不 
同 的 比较 对 象 。 例 如 ; MATLAB 使 用 内 置 常 量 eps 作为 浮 点 运算 的 相 对 精 度 , 值 为 
-A 


2. MATLAB 的 显示 精度 


MATLAB 所 能 显示 的 有 效 位 数 称 为 MATLAB 的 显示 精度 。 默 认 状 态 下 , 若 数 据 
为 整数 , 则 以 整 型 显示 ; 硅 为 实数 , 则 以 保留 小 数 点 后 4 位 的 浮上 扣 数 显示 。 

MATLAB 的 显示 格式 可 由 format 图 数控 制 。 需 要 注意 的 是 ,format 困 数 并 不 改变 
原 数 据 , 只 影响 其 在 命令 窗口 中 的 显示 。 此 外 ,还 可 以 使 用 digits 和 vpa 上 数 来 控制 显示 
精度 。 

【 例 2-3】〗 使 用 format、short .rat digits 和 vpa 国 数 控制 显示 精度 。 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


clc,clear,close all 
eps 

format long 

eps 

format short 

eps 

format rat 


eps 
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digits(10); 
vpa( pi) 
vpal( pi, 20) 


ans = 

2.2204e— 16 
ans = 

2.2204460492503l]3e 一 16 

ans = 

.2204e— 16 
ans = 

1/4503599627370496 

ans = 
3.141592654 
ans = 


3.1415926535897932385 


2.1.3 学 和 从 型 数据 


类 似 于 其 他 高 级 语言 , MATLAB 的 字符 和 字符 串 运算 也 相当 强大 。 在 MATLAB 
中 ,字符 串 可 以 用 单 引号 (') 进 行 赋值 ,字符 串 的 每 个 字符 ( 含 空格 ) 都 是 字符 数组 的 一 个 
元 素 。MATLAB 还 包含 很 多 字符 串 相关 操作 函数 ,如 表 2-3 所 示 . 
表 2-3 字符 串 操 作 函 数 


char strsplit 在 指定 的 分 隔 符 处 拆 分 字符 串 
strcat 水 平 连接 字符 串 寻找 字符 串 中 记号 

strveat 转换 字符 串 为 大 写 

stremp 比较 字符 串 转换 字符 串 为 小 写 

strncmp 比较 字符 串 的 前 n 个 字符 生成 空 字符 串 

strfind 在 其 他 字符 串 中 寻找 此 字符 串 移 去 字符 串 内 空格 

strrep 以 其 他 字符 串 代 替 此 字符 串 ”| 


【 例 2-4】 在 MATLAB 命令 窗口 输入 命令 如 下 : 
clc,clear,close all 


syms ab 
Y=2%a+l; 


运行 程序 ,输出 结果 如 下 : 


字符 串 的 相 减 运算 操作 如 下 : 


本 三 己 士 之; 
Y= = Yl 


运行 程序 ,输出 结 末 如 下 : 


字符 串 的 相 加 运算 操作 如 下 : 


YY 了 3 三 了 十 了 1 


字符 串 的 相 乘 运算 操作 如 下 ， 
y4=y*x yl 
运行 程序 ,输出 结果 如 下 


V2 
(2x¥xa+ 1)x(a+i+ 2) 


于 和 全 时 的 相 除 运算 操作 如 下 : 
y5 = y/Y1 
运行 程序 ;输出 结果 如 下 : 


YW 
(2x*xa+ 1)/(a + 2) 


2.1.4 元 胞 数组 


元 胞 数组 是 MATLAB 语言 中 一 种 特殊 的 数据 类 型 。 元 胞 数组 的 基本 组 成 单位 是 
元 胞 ,元 胞 可 以 存放 任意 类 型 .任意 大 小 的 数组 ,而 且 同 一 个 元 胞 数组 中 各 元 胞 的 内 容 可 
以 不 同 。 

MATLAB 中 元 胞 数组 可 以 通过 赋值 语句 直接 定义 ;也 可 以 由 cell 因数 预先 分 配 存 
诸 空 间 册 对 元 胞 元 素 和 逐个 赋值 。 元 胞 数组 直接 定义 可 以 使 用 花 括 号 4} ,而 使 用 cell 哨 数 
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创建 空 元 胞 数组 可 以 市 约 内 存 占用 ,提高 执行 效率 。 
MATLAB 中 元 胞 数组 的 相关 操作 晒 数 如 表 2-4 所 示 。 
表 2-4 元 胞 数组 操作 函数 


cell 生成 元 胞 数组 对 元 胞 数组 中 元 素 指 定 不 同 的 函数 
cellstr 生成 字符 型 元 胞 数组 判断 是 否 为 元 胞 数组 


celldisp 显示 元 胞 数组 的 内 容 reshape | 改变 元 胞 数组 的 结构 


cellplot 图 形 显 示 元 胞 数组 的 内 容 | 


【 例 2-5】 元 胞 数组 的 创建 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


>> A={[i,2,3],ones(3), 'matlab']} 第 直接 定义 元 胞 数组 


运行 程 订 ,输出 结 末 如 下 : 


LL = 

[lx3 double] [3zx3 double] 'matlab' 
输入 命令 如 下 : 
-B= eallll 3); 多 创建 空 的 元 胞 数组 
> Bll,i}=[1,2,3];BIl,2} = ones(2});BI1,3} = "matlab ': 当 为 元 胞 中 元 素 赋值 
>> celldisp(B) 秆 显示 元 胞 数组 B 


运行 程 厅 ,输出 结 末 如 下 : 


B{l1} = 

1 2 | 
B{2} = 

1 1 

1 1 
B{3} = 
matlab 


2.1.5 结构 体 


结构 体 是 MATLAB 语言 中 万 一 种 能 够 存放 不 同类 型 数据 的 数据 类 型 , 它 与 元 胞 数 
组 的 区 别 在 于 结构 体 是 以 指针 的 方式 来 传 弟 数 据 的 ,而 元 胞 数组 则 是 通过 值 传递 。 结 构 
体 与 元 胞 数组 在 程序 中 的 合理 使 用 ,能够 让 程序 侧 沪 吻 恒 ,操作 方便 。 

MATLAB 中 纺 构 体 的 定义 也 有 两 种 方式 : 一 种 是 直接 赋值 ,为 一 种 是 通过 struct 

直接 赋值 需要 指出 结构 体 的 属性 名 称 , 以 指针 操作 符 ”. "连接 结构 体 变 量 名 与 属性 


名 。 对 某 属 性 进行 赋值 时 ,MATLAB 会 自动 生成 包含 此 属性 的 结构 体 变量 ,而 且 同 一 结 
构 体 变量 中 ,属性 的 数据 类 型 不 要 求 完全 一 致 ,这 也 是 MATLAB 语言 灵活 性 的 体现 。 

结构 体 变量 也 可 以 构成 数组 , 即 结 构 体 数组 ,对 结构 体 数 组 进行 赋值 操作 时 ,可 以 只 
对 部 分 元 素 赋 值 , 此 时 未 被 赋值 的 元 素 将 赋 以 空 矩 阵 ,可 以 随时 对 其 进行 赋值 。 

使 用 struct 恩 数 定义 结构 体 时 , 需 采 用 如 下 调用 方式 : 

结构 体 变 量 名 = struct (属性 名 1, 属性 值 1, 属性 名 2, 属 性 值 2,… ) 

MATLAB 中 结构 体 的 相关 操作 田 数 如 表 2-5 所 示 。 

表 2-5 ”结构 体操 作 函 数 
struct 生成 结构 体 变量 判断 是 否 为 结构 体 变 量 的 属性 


fieldname 得 到 结构 体 变 量 的 属性 名 isstruct 判断 是 否 为 结构 体 变量 
getfield 得 到 结构 体 变量 的 属性 值 删除 结构 体 变量 中 的 属性 


setfield 设 定 结构 体 变 量 的 属性 值 


【 例 2-6】 结构 体 的 创建 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


clc,clear,close all 

mW 多 直接 贼 值 

A. b2 = ones(2); 

A.b3= 'matlab 201]6a'; 

B= struct('b1',1, 'b2', ones(2),'b3', 'matlab 2016a') 告 使 用 struct 函数 赋值 


运行 程序 ,输出 结 采 如 下 : 


bl:1 
b2: [2x2 doublel 
b3: 'matlab 2016a' 


Bl: 1 
b2: [2x2 doublel 
b3: matlab 2016a' 


2.1.6 国 数 句柄 


明 效 句柄 是 用 于 间接 调用 一 个 盟 数 的 MATLAB 值 或 数据 和 型 。 在 调用 其 他 因数 
时 可 以 传 违 上 数 句柄 :也 可 在 数据 结构 中 保存 果 数 句柄 备用 。 

引入 半数 句 森 是 为 了 使 feval 及 倩 助 于 它 的 泛 明 指令 工作 更 可 等 ,特别 在 反复 调用 
情况 下 更 显效 率 : 使 * 陆 数 调 用 ” 像 “ 变 量 调 用 ”一 样 方 便 灵 活 , 提 高 孙 数 调用 速度 , 提 融 软 
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件 重用 性 ,扩大 子 函 数 和 私 用 函数 的 可 调用 范围 ,并 迅速 获得 同名 重 载 函数 的 位 置 . 类 型 
信息 。 

因数 人 句柄 可 以 通过 命令 thandle 王 (functionname 来 创建 ,如 trig {f 一 (msin 或 sqr 一 
(D(x)x. 2 。 

使 用 句柄 调用 上 申 数 的 形式 是 thandle(arg],arg2,…*,argn) 或 fhandle() (无 参数 )， 

【 例 2-7】 上 明 数 句柄 的 创建 和 调用 。 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


clc,clear,close all 
sin f= (®sin; 

a= sin f(pi) 

myadd = (@ (x,y) x+y’”2; 
bl = myadd(1,2) 


运行 程序 ,输出 结 末 如 下 : 


1/8165619676597685 
myadd = 
(四 (x,y)xX+y ”2 
bl = 
本 


2.1.7 数据 类 型 间 的 转换 
MATLAB 支持 不 同 数 据 类 型 间 的 转换 ,这 给 数据 处 理 市 来 极 大 方便 。 稼 用 的 数据 
类 型 转换 靖 数 如 表 2-6 所 示 。 
表 2-6 数据 类 型 转换 函数 


int2str 十 进 制 数 一 十 六 进 制 数 
mat2str 矩阵 一 字符 串 hex2dec 十 六 进 制 数 一 十 进 制 数 
num2str 十 六 进 制 数 -~~ 双 精度 浮 点 数 
str2num 浮 点 数 一 十 六 进 制 数 
base2dec B 底 字符 串 一 十 进 制 数 元 胞 数组 一 数值 数组 
bin2dec 二 进 制 数 一 和 二进制 数 cell2struct 元 胞 数组 一 结构 体 数 组 
dec2base 十 进 制 数 一 B 底 字 符 串 mat2cell 数值 数组 一 元 胞 数组 

dec2 bin 十进制 数 一 二 进 制 数 struct2cell 结构 体 数 组 一 元 胞 数组 


【 例 2-8〗】 数据 类 型 之 间 的 切 斤 ,特别 对 于 图 像 本 册 而 言 , 有 较 和 多 的 应 用 ,图 像 谈 人 
的 多 位 uint8 型 数据 ,需要 转换 成 double 型 数据 进行 处 理 。 数 据 类 型 转换 编程 如 下 : 


clc,clear,close all 

im = imreadl( 'cameraman. tif'); 
imshow!( im) 

iml = im2double( im):; 


imshow( im) 


运行 结 采 如 图 2-1 所 示 。 
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图 2-1 数据 类 型 转换 


字符 型 变量 转换 ,命令 如 下 : 


clc,clear,close all 
已 三 "2 

b= double(a) 

bl = str2num(a) 

己 二 2 忆 关 量 

d=2¥%b 

d=2* bl 


运行 程序 ,输出 结 采 如 下 : 


忆 二 
2 
b = 
50 
bl = 
到 
CC = 
100 
过 = 
100 
d = 
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2.2 数组 运算 


数组 运算 是 MATLAB 计算 的 基础 。 由 于 MATLAB 面向 对 象 的 特性 ,这 种 数值 数 
组 成 为 MATLAB 最 重要 的 一 种 内 建 数据 类 型 ,而 数组 运算 就 是 定义 这 种 数据 结构 的 方 
法 。 本 节 将 系统 地 列 出 具备 数组 运算 能 力 的 函数 名 称 , 为 兼顾 一 般 性 ,以 二 维 数组 的 运 
算 为 例 , 读 者 可 推广 至 多 维 数组 和 多 维 矩 阵 的 运算 。 

下 面 将 介绍 在 MATLAB 中 如 何 建立 数组 ,以 及 数组 的 常用 操作 等 ,包括 数组 的 算 
术 运 算 .关系 运算 和 逻辑 运算 。 


2.2.1 数组 的 创建 和 操作 


在 MATLAB 中 一 般 使 用 “| ]”、“,”、 空 格 和 “;” 来 创建 数组 ,数组 中 同一 行 的 元 素 使 
用 腺 所 或 空格 进行 分 隔 , 不 同行 之 则 用 分 扎 进 行 分 隅 。 

【 例 2-9】〗 创建 空 数组 , 行 向 量 、 列 向 量 示 例 。 

在 命令 行 窗 口中 轩 入 如 下 语句 : 


clear all 

n= 

B=|[654321| 
C=[6,5,4,3,2,1] 

D= [6;S5;4;3;2;1| 

下 = B' 竺 转 置 


命令 行 窗口 中 的 输出 结果 如 下 : 


及 = [ 
B = 6 5 4 本 2 1 
C = 6 5 4 3 2 1 
下 二 一 

6 

5 

4 

3 

2 

1 
及 = 


局 


【 例 2-103 访问 数组 示例 。 
在 命令 行 窗口 中 输入 如 下 语句 : 


Clear all 
A=[654321| 


一 澡 风 六 及 8VTLYIK 其 图 党 


al = A(1) 和 访问 数组 第 1 个 元 素 

a2= A(1:3) 竺 访问 数组 第 1.2.3 个 元 素 

a3 = A(3:end) 多 访问 数组 第 3 个 到 最 后 一 个 元 素 
ad4=A(end:—1:1) 先 数 组 元 素 反 序 输 出 

a5= AlI16|]) 和 访问 数组 第 1 个 及 第 6 个 元 素 


命令 行 窗 口中 的 输出 结果 如 下 : 


A = 6 5 4 3 2 1 
al = 6 

a2 = 6 5 4 

a3 = 4 3 2 1 

ad = 1 2 3 4 5 6 
a5 = 6 1 


【 例 2-11】 子 数 组 的 赋值 (Assign) 示 例 。 
在 命令 行 窗 口中 输入 如 下 请 人 句 : 

clear all 

A=[654321| 

A(3) = 0 

A([1 4])=[11] 


命令 行 窗口 中 的 输出 结果 如 下 : 


于 6 5 二 3 之 1 
A = 6 3 0 3 之 1 
3 1 5 0 1 之 1 


在 MATLAB 中 还 可 以 通过 其 他 各 种 方式 创建 数组 ,具体 如 下 。 
1. 通过 冒号 创建 一 维 数 组 
在 MATLAB 中 ,通过 冒号 创建 一 维 数组 的 代码 如 下 : 


二 BA:step:B 


其 中 ,A 是 创建 一 维 数组 的 第 一 个 变量 ,step 是 每 次 递增 或 递减 的 数值 ,直到 最 后 一 
个 元 素 和 B 的 差 的 绝对 值 小 于 等 于 step 的 绝对 值 为 止 。 

【 例 2-12】 通过 冒号 创建 一 维 数组 示例 。 

在 命令 行 窗 口中 输入 如 下 语句 : 


Ll 
yt 
国 
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clear all 

' WW 
B=2.1:1.35:6 

二 过 一 :一 敢 
D=2.1:-1.5:6 


命令 行 窗口 中 的 输出 结果 如 下 : 


A = 2 3 4 5 6 

B = 2.1000 3.6000 5.1000 

了 2.1000 0.6000 一 0.9000 一 2.4000 一 3.9000 一 5.4000 
D = Empty matrix: 1—-by—0 


2. 通过 logspace 函数 创建 一 维 数 组 


: MATLAB 管用 logspace (0) 晴 数 创建 一 维 数组 ,该 限 数 的 调用 方式 如 下 。 
| (1) y 二 logspace(a,b): 该 图 数 创 建行 回 量 yy, 第 一 个 元 紊 为 10", 最 后 一 个 元 系 为 
10 ,形成 总 数 为 50 个 元 素 的 等 比 数列 。 
(2) y 一 logspacel(a,b,n): 该 图 数 创 建行 回 量 y ,第 一 个 元 系 为 10" ,最 后 一 个 元 紊 
为 10* ,形成 总 数 为 元 个 元 素 的 等 比 数列 。 
| 【 例 2-13】 通过 logspace 图 数 创 建 一 维 数 组 示例 。 
在 命令 行 窗 口中 输入 如 下 语句 : 


Clear all 

format short:; 

A= logspace(1,2,20) 
B= logspace(1,2,10) 


命令 行 窗 口中 的 输出 结果 如 下 : 


A = 10.0000 11.2884 12.7427 14.3845 16.2378 18.3298 20.691]4 23.3572 26.3665 
29.7635 33.5982 37.9269 42.8133 48.3293 54.5559 61.5848 69.5193 78.4760 
88.5867 100.0000 

B = 10.0000 12.9155 16.6810 21.5443 27.8256 35.9381 46.4159 59.9484 77.4264 
100.0000 


3. 通过 linspace 函数 创建 一 维 数组 


MATLAB 和 背 用 linspace(C) 因数 创建 一 维 数 组 ,该 图 数 的 调用 方式 如 下 。 
(1) y 一 linspace (ab): 该 果 数 创建 行 回 量 了, 第 一 个 元 素 为 ea, 最 后 一 个 元 素 为 ， 
形成 总 数 为 100 个 元 率 的 等 比 数 列 。 

(2) y 一 linspace (avb,n): 该 函数 创建 行 同 量 y, 第 一 个 元 紊 为 ,最 后 一 个 元 素 为 
p ,形成 总 数 为 nn 个 元 对 的 等 比 数列 。 

【 例 2-14】 通过 linspace 函数 创建 一 维 数组 示例 。 

在 命令 行 窗 口中 输入 如 下 语句 : 


1 
省 


Clear all 

format short.; 

A = linspace(l1,100) 
B = linspace(l1, 36,12) 
C= linspace(l1,36,1) 


命令 行 窗口 中 的 输出 结果 如 下 : 


= 

Columns 1 through 25 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 1 
1 6 17 18 19 20 21 22 23 之 4 25 

Columns 26 through 50 
26 27 28 29 30 31 32 本 本 34 了 5 36 本 了 38 39 
40 41 42 43 444 45 46 47 48 49 50 

Columns S51 through 75 
51 5 之 与 3 54 与 56 57 58 59 60 61 62 63 64 
65 66 67 68 69 70 71 72 73 74 了 5 

Columns 76 through 100 
76 TT 78 79 80 81 82 83 84 85 86 87 88 89 
90 91 92 93 94 95 96 97 98 99 100 


B =1.0000 4.1818 7 了 .3636 10.5455 13. 7273 16.9091 20.0909 23.27127] 26.4545 
29.6364 32.8182 36.0000 
.二 36 


2.2.2 数组 的 第 见 运算 


1. 数组 的 算术 运算 


数组 的 运算 是 从 数组 的 单个 元 素 出 发 ,针对 每 个 元 素 进 行 的 运算 。 在 MATLAB 
中 ,一 维 数组 的 基本 运算 包括 加 减 . 乘 . 左 除 . 右 除 和 乘 方 。 

(1) 数组 的 加 减 运算 : 通过 格式 A 十 B 或 A 一 B 可 实现 数组 的 加 减 运 算 。 但 是 运算 
规则 要 求 数 组 A 和 B 的 维 数 相 同 。 

提示 : 如 果 两 个 数组 的 维 数 不 相同 , 则 将 给 出 错误 的 信息 。 

【 例 2-15】 数组 的 加 减 运 算 示 例 。 

在 命令 行 窗口 中 输入 如 下 语句 : 


clear all 
A=[156896] 
B=|[|3 856240] 
CC=[1L11111 


D=A+B 多 加 法 

E=A—B 名 减法 

F=Ax2 

人 = 及 十 了 对 数组 与 常数 的 加 法 
H=A—C 


- 写 i 关 肝 8VTLYWN 天 国营 


机 


CA 
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命令 行 窗 口中 的 输出 结果 如 下 : 


A = 1 5 6 8 9 6 
B = 9 Bs 2 0 
C = 1 1 1 1 

D = 10 90 12 10 13 6 
E = 一 总 — 80 0 6 5 

F = 之 10 之 16 18 12 
G 三 4 8 9 11 12 9 
错误 使 用 一 

矩阵 维度 必须 一 致 


(2) 数组 的 乘除 运算 : 通过 格式 .x* “或 ". /可 实现 数组 的 乘除 运 算 。 但 是 运算 规 
则 要 求 数 组 A 和 B 的 维 效 相同 。 

乘法 : 数组 A 和 B 的 维 数 相同 ,运算 为 数组 对 应 元 厅 相 乘 , 计 算 结 果 与 A 和 B 是 相 
同 维 数 的 数组 。 

除法 : 数组 A 和 B 的 维 数 相 同 , 运 算 为 数组 对 应 元 系 相 际 ,计算 结果 与 A 和 B 是 相 
同 维 数 的 数组 。 

右 除 和 左 除 的 关系 : A./B 二 B.\A, 其 中 A 是 被 除数 ,B 是 除数 。 

提示 : 如 果 两 个 数组 的 维 数 不 相同 , 则 给 出 错误 的 信息 。 

【 例 2-16】 数组 的 乘法 示例 。 

在 命令 行 窗 口中 输入 如 下 语句 : 

Clear all 


A=[156896| 
B=[956240] 


C=A.*#* B 先 数 组 的 点 乘 
D=A x 3 外 数组 与 常数 的 乘法 


命令 行 窗口 中 的 输出 结 采 如 下 : 


二 1 5 6 8 9 6 
B = 9 5 6 之 4 0 
,三 9 5 36 16 36 0 
D = 3 15 18 之 4 之 了 18 


【 例 2-17】 数组 的 除法 示例 。 
在 命令 行 窗 口中 输入 如 下 语句 : 
clear all 


A=[156896] 
B=[956240] 


C= A.‘\B 当 数 组 和 数组 的 左 除 
D = A./B 第 数组 和 数组 的 右 除 
E= A./3 对 数组 与 常数 的 除法 
F = A/3 


口中 的 输出 结 采 如 下 : 


A 1 6 8 6 
B 9 6 2 0 
CG .1111 1.0000 1.0000 4.0000 2. 2500 Inf 
D 9.0000 1.0000 1.0000 0.2500 0.4444 0 
E 0 . 3333 1] .6667 .0000 2.6667 3.0000 2.0000 
F 0 .3333 1.6667 2.0000 2.6667 3.0000 2.0000 


- 没 妆 和 泊 HYTLYW 治国 罕 


(3) 通过 乘 方 格式 “. ”实现 数组 的 乘 方 运 算 。 数 组 的 滋 方 运算 包括 数组 间 的 滋 方 运 
算 .数组 与 某 个 具体 数值 的 乘 方 运算 ,以 及 常数 与 数组 的 乘 方 运算 。 

【 例 2-18】 数组 的 乘 方 示例 。 

在 命令 行 窗 口中 输入 如 下 语句 : 

clear all 


A=[156896] 
B=[956240] 


C= A.°B 车 数组 的 乘 方 

D= A."*3 竺 数组 与 某 个 有 具体 数值 的 乘 方 

E=3.*A 和 常数 与 数组 的 琵 方 

命令 行 窗 口中 的 输出 结果 如 下 : 

A = 1 5 6 8 9 6 

B = 9 5 6 2 4 0 

C = 1 3125 46656 64 6561 1 
D = 1 125 216 512 729 216 

E = 3 243 729 6561 19683 729 


(4) 通过 畏 数 dotQO 〇 0) 可 实现 数组 的 点 积 运 算 , 但 是 运算 规则 要 求 数 组 A 和 6B 的 维 数 


相同 。 其 调用 格式 如 下 : 
C= dot(A,B) 
C = dot(A,B, dim) 
【 例 2-193】 数组 的 点 积 示例 。 
在 命令 行 窗 口中 输入 如 下 语句: 


clear all 
A=[156896] 
B=[956240| 
C= dot(A, B) 

D= sum(A. x B) 


秆 数组 的 点 积 
第 数组 元 素 的 乘积 之 和 


命令 行 窗 口中 的 输出 结 采 如 下 : 


四 1 5 6 日 9 6 
B = 9 5 6 2 4 0 


机 
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2. 数组 的 关系 运算 


在 MATLAB 中 提供 了 6 种 数组 关系 运算 符 , 即 一 (小 于 )、 一 一 (小 于 等 于 )、 二 (大 
于 ) .二 一 (大 于 等 于 ) .一 一 ( 恒 等 于 ) .一 一 (不 等 于 ) 。 

关系 运算 的 运算 法 则 如 下 : 

(1) 当 两 个 比较 量 是 标量 时 ,直接 比较 两 个 数 的 大 小 。 和 在 关系 成 立 , 则 返回 的 结果 为 
1 ,否则 为 0。 

《2) 当 两 个 比较 量 是 维 数 相等 的 数组 时 ,逐一 比较 两 个 数组 相同 位 置 的 元 素 , 并 给 出 
比较 结果 。 最 终 的 关系 运算 结果 是 一 个 与 参与 比较 的 数组 维 数 相 同 的 数组 ,其 组 成 元 素 
为 0 或 1。 

【 例 2-20】 数组 的 关系 运算 示例 。 

在 命令 行 窗口 中 输入 如 下 语句 : 

clear all 


A=[156896] 
B=[956240] 


C=A<6 第 数组 与 常数 比较 ,小 于 
D=A>=6 秆 数组 与 常数 比较 ,大 于 等 于 
E=A<B 竺 数 组 与 数组 比较 ， 小 于 
F=A==B 各 数组 与 数组 比较 , 恒 等 于 


- 


命令 行 窗口 中 的 输出 结果 如 下 : 


| 


“二 1 了 6 8 9 6 
二 9 5 6 二 4 0 
GC 二 1 1 0 0 0 0 
D = 0 0 1 1 1 1 
es= 1 0 0 0 0 0 
F = 0 1 1 0 0 0 


3. 数组 的 到 辑 运 算 


在 MATLAB 中 提供 了 3 种 数组 逻辑 运算 符 , 即 竺 (与 )、| (或 ) 和 一 ( 非 )。 逻 辑 运 算 
的 运算 法 则 如 下 : 

《1) 如 果 是 非 零 元 素 则 为 真 , 用 1 表示 ;反之 是 零 元 素 则 为 假 , 用 0 表示 。 

(2) 当 两 个 比较 量 是 维 数 相 等 的 数组 时 ,逐一 比较 两 个 数组 相同 位 置 的 元 素 , 并 给 出 
比较 结果 。 最 终 的 关系 运算 结果 是 一 个 与 参与 比较 的 数组 维 数 相 同 的 数组 ,其 组 成 元 素 
为 0 或 1。 

(3) 与 运算 (Ce 必 b) 时 ,ae 2 全 为 非 零 , 则 为 真 , 运 算 结 果 为 1; 或 运算 (a15) 时 ,只 要 a 
b 有 一 个 为 非 零 , 则 运算 结果 为 1; 非 运 算 ( 一 a) 时 ,车 a 为 0, 则 运算 结果 为 1, 若 a 为 非 


1 
1 
1 
1 
EE 
pe 
Me 


雪 , 则 运算 结 采 为 0。 
【 例 2-21] 数组 的 逻辑 运算 示例 。 
在 命令 行 窗 口中 输入 如 下 请 人 句 : 
clear all 


A=[156896] 
B=[956240] 


C= RSB 当 与 
D= A|B 入 或 
E=~B 当 非 


命令 行 窗 口中 的 输出 结果 如 下 : 


“三 1 5 6 8 6 
二 9 5 6 a 委 0 
C = ] 1 1 1 1 0 
1 二 1 1 1 ] 1 1 
E = 0 0 0 0 0 1 


2.3 和 矩阵 运算 


MATLAB 简称 矩阵 实验 室 , 对 于 矩阵 的 运算 ,MATLAB 软件 有 着 得 天 独 厚 的 优势 。 

生成 矩阵 的 方法 有 很 多 种 : 直接 输入 矩阵 元 素 ; 对 已 知 矩阵 进行 矩阵 组 合 、 矩 阵 转 
向 ,矩阵 移 位 操作 ; 读 取 数据 文件 ; 使 用 函数 直接 生成 特殊 矩阵 。 表 2-7 列 出 了 常用 的 特 
吻 和 矩阵 生成 函数 。 


表 2-7 弟 用 的 特殊 矩阵 生成 函数 


eye 
11] 


rand 均匀 分 布 随 机 和 矩阵 Hilbert 矩阵 
randn 正 态 分 布 随 机 分 布 Hilbert 逆 和 矩阵 


magilc 


diag Pascal 矩阵 
EE Hadamard 逢 广 
tril 下 三 角 和 矩阵 hankel() Hankel 矩阵 


2.3.1 和 夕 阵 生成 


【 例 2-22】 随机 和 矩阵 输入 : 


>> A= rand(S5) 


这 图 党 


--- 台 人 ! 六 凡 8YTLYW 


列 如 下 : 
A 中 第 3 一 5 列 如 下 : 


A 中 第 1 行 如 下 : 


A 中 第 1 列 如 下 : 
A 中 第 2 行 如 下 : 


A 中 第 2 


---------- MATLAB 科 学 计算 


ans = 
D0.7431 


ie er 
ANSs 二 
0. 3922 
0.6555 
0.1712 


0.0318 


0. 
0. 
0. 


2169 
0462 
D0971 


0. 


D0. 
0. 
D0. 


6948 


3171 
9502 
0344 


【 例 2-233 和 矩阵 的 乘法 运算 。 


>> 及 之 


. 4011 
.2436 
- 3919 
.1410 
.22995 


== 


【 例 2-24】 


>> A.^2 


D0. 0026 
D0. T7565 
0.0018 
0.0080 
0.0029 


D0. 2015 0.7194 
0.5555 D0.8460 
0. 4631 1.7354 
D0. 2939 0.9334 
D0. 4842 1.8414 
矩阵 的 氮 乘 运算 。 
D. 1115 D0.0035 
0.0196 0.1408 
0. 0822 D0.7547 
D0. 0085 0. 3318 
0.0311 0. 7059 


【 例 2-25】 算 隆 的 际 法 运算 。 


A"2%N.°2 


- 3308 
-= 
一 机. 


1769 


0898 
- D537 
.0345 


.A4762 
.1661 
.5800 
-i115 
. 4792 


a | 


= 


- 33816 


- T0355 
he pe 
.13869 


-了 7 了 7 之 
. 5994 
.4175 
- 8985 
3405 


- O031 
-4343 
- B217 
-0167 
-6008 


-B505 
.8143 
- 1892 
. 4802 
Ee Be pe 


a | 


总 = = | 


. 4456 


.6463 
.7094 
.7547 


.44955 
- 9364 
. 0347 
- 6118 
.1836 


- 本 过 之 
-0019 
.41121 
.1439 
. 323026 


- 0382 
一 4 和 4. 
i 
.由 729 
-】7 78B 


2 7 41 
0326 


天 国营 
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【 例 2-26 和 矩阵 的 减法 运算 。 


>> 只 “之 一 有 .之 


ITS 三 
0. 3984 
0.35129 
0. 3901 
0.1330 
0.2965 


= = 


- O300 
.3359 
.3810 
. 2854 
- 给.31 


SO 
- T1052 
- 9807 
.6016 
RE le 


【 例 2-27 和 矩阵 的 加 法 运算 。 


= "ZTA.2 


SS o> 9 
Lu 
\o 
Lu 
=] 


【 例 2-28】 


千 第 hankel 矩阵 


= 总 与 与 总 


-了 730 
es i 
. 5453 
-3 
3154 


clc,clear,close all 


二 [1:3], 
r=[3:91, 


H= hankel(c, Ir) 


ee 
1 过 
ER 
3 二 
H 二 
1 
2 本 
本 
【 例 2-29 了】 


Clec,clear,cCclose all 


A= hilb(5) 


了 
. 9868 
.4901 
] . 2652 
.5473 


Hankel 和 矩阵 求解 。 


SO DO oO 9 


DD 


.7741 
:152 
dy 
.38818 
- 9297 


- 17803 
. O337 
- 攻 492 
- 9152 
-1314 


= 


i 已 


- 41128 
- 9345 
. 8626 
. 4679 
.6809 


- 38182 
- 9383 
- 2068 
i 
.6862 


Hibert 算 阵 及 逆 Hibert 矩阵 生成 ，。 


运行 程序 ,输出 结果 如 下 : 
2 三 
1.0000 0.5000 0. 3333 0.2500 0.2000 
0.5000 0. 3333 0.2500 0.2000 0.1667 
0. 3333 0.2500 0.2000 0.1667 0.1429 
0.2500 0. 2000 0.1667 0.1429 0.1250 
0.2000 0.1667 0.1429 0.1250 0.1111 
更 改 输出 格式 ,如 下 : 
format rat 
A 
运行 程序 ,输出 结果 如 下 : 
2 三 
1 1 /2 1/3 1/d 1/5 
1/2 1/3 1/4 1/5 1/6 
1/3 1/4 1/5 1/6 1/7 
174 1/5 1/6 1/7 1/8 
1/5 1/6 1/7 1/8 1/9 
【 例 2-30 硕 尔 但 特 逆 矩阵 求解 如 下 : 
A= invhilb(5) 
运行 程序 ,输出 结果 如 下 : 
A 三 
25 一 300 1050 一 1400 630 
一 300 4800 一 18900 26880 一 12600 
1050 一 18900 79380 一 117600 56700 
一 1400 26880 一 117600 179200 一 88200 
630 一 12600 56700 — 88200 44100 


2.3.2 了 回 量 的 生成 


癌 量 是 指 单 行 或 单列 的 和 矩阵 ,是 组 成 矩阵 的 基本 元 系 之 一 。 在 求 菏 些 限 数值 或 曲线 
时 ,和 常 第 要 设 定 日 变量 的 一 系列 伸 ,; 因 此 际 了 和 责 接 使 用 “|L 1” 生 成品 量 , MATLAB 还 提供 
了 了 两 种 为 等 间隔 加 量 赋值 的 向 单方 法 。 


1. 使 用 冒号 表达 式 生成 向 量 
冒号 表达 式 的 格式 为 x 二 [ 初 值 x。: 增 量 : 终 值 x,]。 这 里 需要 注意 以 下 几 点 ; 


-一 党 妆 和 污 HVYTLYWN 其 图 悚 
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(1) 生成 的 回 量 尾 元 素 并 不 一 定 是 终 值 rz , 当 x 一 xo 怡 好 为 增 量 的 整数 倍 时 ,rz 才 
为 尾 元 系 。 

(2) 当 za 全 to 时 , 增 量 必须 为 正 值 ; 当 x 三 Xxo 时 , 增 量 必须 为 什 值 : 当 Xn 二 xo 时 ， 
回 量 只 有 一 个 元 素 。 

《3) 当 增 量 为 1 时 , 增 量 值 可 以 略 去 ,直接 与 成 x 一 | 初 值 x : 终 值 xn 。 

《4) 方 括号 “EL1” 可 以 删 去 。 


2. 使 用 linspace 函数 生成 向 量 


linspace 因数 的 调用 格式 为 x 一 linspace( 初 值 xl , 终 值 xn 点数 n) ,点 数 寺 也 可 不 写 ， 
此 时 默认 ?一 100 。 

【 例 2-31 等 间隔 回 量 赋值 。 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


= 七 三 1] :3:20 


运行 程序 ,输出 结果 如 下 : 


命令 如 下 : 
=] 3 了 -一 220 
运行 程序 ,输出 结果 如 下 : 
七 = 
Columns 1 through 9 
10 7 4 1 了 一 号 —8 I — 14 


Columns 10 through 11 
“Li = 2 


pr = ep 


命令 如 下 : 


| 


运行 程序 ,输出 结果 如 下 : 


命令 如 下 : 


>>t= linspace(l1,10,5) 


1 运 : 行程 让， 输出 结果 如 下 : 


| 夺 
1.0000 3.2500 5. 5000 7.7500 10.0000 


【 例 2-32】 有 时 需要 生成 对 数 等 比 回 量 ,此 时 可 用 logspace 图 数 。 其 调用 格 陈 为 : 


x 一 logspace( 初 值 x1i, 终 值 xs 点数 n), 它 表示 从 10 的 寺 次 蝴 到 x 次 蝴 等 比 生 成 7 


MATLAB 命令 窗口 输入 命令 如 下 : 


> 六 > 七 = lJogspace(0,1,15) 


运行 程 厅 ,输出 结 来 如 下 : 


i 大 
Columns 1 through 5 
1.0000 1 .1788 1. 3895 1.6379 1.9307 
Columns 6 through 10 
2.2758 2.6827 3.1623 3.7276 4. 3940 
Columns 11 through 15 
5.1795 6.1054 7.1969 8. 4834 10.0000 


ay 减 、. 乘 、 除 .比较 运算 和 逻辑 运算 等 代数 运算 是 MATLAB 数值 计算 最 基 
部 分 。 下 面 将 重点 介绍 这 些 运算 。 


2.3.3 和 算 阵 加 减 运 算 


进行 年 阵 加 法 、 减 法 运算 的 前 提 是 人 戎 与 运算 的 两 个 矩阵 或 多 个 和 矩阵 必须 具有 相同 的 


行 数 和 列 数 , 即 A、B.C 等 多 个 和 矩阵 均 为 m Xn 算 阵 ; 或 者 其 中 有 一 个 或 多 个 矩阵 为 标量 。 


在 上 述 前 提 下 ,对 于 同型 的 两 个 矩阵 ,其 加 减法 定义 如 下 : 

C 二 A 士 B, 短 阵 C 的 各 元 素 Crm 二 A 十 Bm 。 

当 其 中 含有 标量 x 时 ,有 

C= 二 A 士 x, 算 阵 C 的 各 元 素 Cm 二 Am 十。 

由 于 矩阵 的 加 法 运算 归结 为 其 元 系 的 加 法 运算 ;容易 验证 ;因此 和 矩阵 的 加 法 运算 满 


足下 列 运 算 律 。 


- 光 半 疝 民 HEVTLVI 册 图 营 
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(1) 交换 律 : A 十 B= 二 B 十 A， 

(2) 结合 律 ; A 十 (B 十 中 = 二 (4 十 B) 十 CC。 

(3) 存在 零 元 : 4 十 0 王 0 十 4 一 4。 

(4) 存在 负 元 : A 十 (一 A) 二 (一 A) 十 A。 

【 例 2-33 算 阵 加 减法 运算 示例 。 

已 知 和 矩阵 4 王 [1057942;106682;46111], 和 矩阵 吾 一 [95342;104 一 23 2， 
46 一 1 1 0], 行 向 量 C= 一 [2 1], 标 量 x 一 20, 试 求 A 十 B.A 一 B.A 十 B 十 x.A 一 x.A 一 C。 

输入 的 命令 为 : 


A= [1057942;106682;46111]， 

B= [95342:104 -232;:46 -110]: 
eT 
Cc 


= 20; 
[2 11 
APpPB= A+B 
AmB= A—B 
员 PBP = A+B+i+x 
AmX= A—X 
AmC= A—C 
得 到 的 结果 如 下 : 
ApB = 
19 10 82 8 4 
2 0 了 人 一 二 
12 0 A 
AmB = 
1 0 76 0 0 
0 0 62 31 
0 0 2 0 1 
员 PBP = 
39 30 102 28 24 
22 20 90 本 24 
28 本 过 20 22 21 
Amw = 
0 =15 59 一 1bo 18 
一 3 一 20 46 一 1 之 一 二 8 
6 一 1d 一 19 一 19 一 9 
错误 使 用 一 
矩阵 维度 必须 一 致 


在 4 一 C 的 运算 中 ,MATLAB 返回 错误 信息 ,并 提示 乍 阵 的 维 数 必 须 相 等 。 这 也 证 
明了 矩阵 进行 加 减法 运算 必须 满足 一 定 的 前 提 条 件 。 


2.3.4 和 钴 阵 乘法 运 蜡 


MATLAB 中 和 矩阵 的 乘法 运算 包括 两 种 : 数 与 矩阵 的 乘法 、 算 阵 与 矩阵 的 乘法 。 


1. 数 与 矩阵 的 乘法 


由 于 单个 数 在 MATLAB 中 是 以 标量 来 存储 的 ,因此 数 与 矩阵 的 乘法 也 可 以 称 为 标 
量 与 矩阵 的 乘法 。 

设 工 为 一 个 数 ,A 为 矩阵 , 则 定义 工 与 4 的 乘积 C 一 xz4 仍 为 一 个 矩阵 ,C 的 元 素 就 是 
用 数 zz 乘 矩 阵 4 中 对 应 的 元 素 而 得 到 , 即 Cu 一 z4w。 数 与 矩阵 的 乘法 满足 下 列 运 
算 律 : 

(1) 1A=A. 

(2) T(ATB)=rAT 1B. 

(3) (zy)A=zxA 二 yA,. 

(4) (ry)A=r(tyA) = yrA ), 

【 例 2-34】 和 宇 阵 数 乘 示例 。 

已 知 和 矩阵 4=[033;110; 一 123]:; 玉 是 3 阶 单位 矩阵 ,下 王 L100;010;001]， 
试 求 表达 式 24 十 3 五 。 

输入 的 命令 如 下 : 

A=[033;1 10;—-123|]; 


E = eyel(3) : 
R=2% A3xE 


得 到 的 结 采 如 下 : 


R = 
可 6 6 

5 0 

二 中 9 


2. 和 矩阵 与 矩阵 的 乘法 
两 个 和 矩阵 的 乘法 必须 满足 被 乘 和 矩阵 的 列 数 与 乘 和 矩阵 的 行 数 相等 


。 设 和 矩 阵 和 A 为 mXh 
H 
矩阵 , 吾 为 h Xn 和 矩阵 , 则 两 矩阵 的 乘积 C 一 AXB 为 一 个 矩阵 , 且 Cjw 一 》 A X Bm。 


算 阵 之 间 的 乘法 不 遵循 交换 律 , 即 AXB 关 BXA。 但 矩阵 乘法 体 循 下 列 运算 律 。 

(1) 结合 律 ; (AXB)XC=AX(BXO)， 

(2) 左 分 配 律 : AX(B 二 TO) 一 AXB 二 AXC., 

(3) 右 分 配 律 : (了 二 C) XA 一 BxXA 二 CXxA。， 

《4) 单位 算 阵 的 存在 性 : EXxA 一 A,AXE==A。 

【 例 2-3sS] 条 阵 乘法 的 示例 。 

已 知 和 矩阵 A 二 [2 140; 1 一 134], 和 矩阵 吾 王 [131; 0 一 12; 1 一 31;40 一 2], 试 求 
算 孟 滋 积 4 号 及 BA4。 

输入 的 命令 如 下 : 


-一 党 忆 关注 IVTLYWN 党 较 深 
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A= [22140;1 -i134|]-: 
百人 
R1= Ax*B 

R2= Bx*A 


程序 运行 结 采 如 下 : 


R1 = 
6 二 7 8 
20 二 号 -6 
错误 使 用 * 


内 部 矩阵 维度 让 须 一 致 竺 由 于 不 满足 矩阵 的 乘法 条 件 , 故 BR 无 法 计算 


2.3.S 年 阵 除 法 运算 


矩阵 的 除法 是 乘法 的 道 运 算 , 分 为 左 除 和 右 除 两 种 ,分 别 用 运算 符号 “\”" 和 “/” 表 示 。 
如 果 和 抢 阵 4 和 和 抢 阵 吾 是 标量 ,那么 A/B 和 A\B 是 等 价 的 。 对 于 一 般 的 二 维和 矩阵 4 和 了 吾 ， 
当 进 行 4\ 了 运算 时 ,要 求生 的 行 数 与 吾 的 行 数 相等 ; 当 进 行 A/B 运算 时 ,要 求 4 的 列 数 
与 B 的 列 数 相 等 。 

【 例 2-36】 算 阵 除法 的 示例 。 

设 和 矩阵 4=L1 2; 13j, 和 矩阵 吾 王 L1 0; 1 2],; 试 求 A\B 和 有 A/B. 

输入 的 命令 如 下 : 


A= [1L2;1L13|:; 
B= [10;1 2|]; 
Rl1 = A\B 
R2 = A/B 


程序 运行 结果 如 下 


0 1.000000000000000 
一 0.500000000000000 1.500000000000000 


2.4 奇异 值 分 解 


奇异 值 分 解 在 某 些 方面 与 对 称 和 矩阵 或 Hermite 和 矩阵 基于 特征 回 量 的 对 角 化 类 似 。 
对 已 瑾 和 矩阵 育 异 全 分 析 程 序 如 下 : 


clc,clear,close all 
A= rand(5), 
[VY,D,U|] = svd(A) 


运行 程序 ,输出 结果 如 下 : 


:国内 


i 
[a 


= 
664/815 694/7115 589/3737 689/4856 3581/5461 
1298/1433 408/1465 6271/6461 407/965 489/13693 
751/5914 1324/2421 581/607 1065/1163 439/517 
717/785 338/353 614/1265 G61/ATT 283/303 
1493/2361 687/712 1142/1427 1966/2049 1481/2182 
和 二 
— 1749/7066 — 2221/3966 937/2268 129/224 561/1601 
— 611/1725 — 4813/9244 一 2543/3356 — 131/11843 一 1058/6197 
一 536/1155 721/1199 — 413/2460 1375/2268 一 229/1386 
— 1313/2398 — 496/4191 494/1039 — 1015/3063 — 525/887 
一 457/837 154/773 一 139/4660 — 308/705 1011/1474 
证 三 
1567/473 0 0 0 0 
0 1210/1283 0 0 0 
0 0 1629/1949 0 0 
0 0 0 2585/5344 0 
0 0 0 0 79/3990 
I = 
— 379/880 — 1401/1585 337/6355 — 479/5417 1291/8591 
一 752/1745 740/3353 1205/6144 — 175/239 一 274/627 
— 1919/4156 184/2067 — 516/691 847/2734 — 527/1489 
一 307/649 937/2532 — 95/1191 一 639/6247 815/1033 
— 2200/5023 1510/9527 551/877 1124/1901 一 572/2907 


2.5 和 矩 阵 的 基本 函数 运算 


MATLAB 支持 多 种 矩阵 的 因数 。 篆 用 的 算 阵 的 因数 运算 如 表 2-8 所 示 。 
表 2-8 MATLAB 常用 和 矩阵 函数 运算 


--- 澡 i 郑 凡 YTLYW 


det 求 矩 阵 的 行列 式 矩阵 左右 翻转 

inv 求 矩阵 的 逆 矩阵 上 下 翻转 

cig 求 和 矩阵 的 特征 值 和 特征 向 量 resharp 矩阵 阶 数 重组 

rank 求 和 矩阵 的 秩 矩阵 逆 时 针 旋转 90* 
trace 求 矩阵 的 迹 提取 或 建立 对 角 阵 
norm 求 矩 阵 的 范 数 取 和 矩阵 的 左下 三 角 部 分 
poly 求 矩 阵 特征 方程 的 根 取 和 矩阵 的 右上 三 角 部 分 
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【 例 2-37】 计算 和 矩阵 的 特征 值 和 特征 向 量 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


“A=|[8 1.6G3.5. 972]- 
>> [x,y] = eig(A) 委 工 为 特征 向 量 矩 阵 ,Y 为 特征 值 矩 阵 


运行 程序 ,输出 结 采 如 下 : 


Xx 一 

一 0.25714 一 0.8131 一 0.3416 

— 0.5774 0.4714 一 0.4714 

— 0.5774 0.3416 0.8131 
= 

15.0000 0 0 

0 4.8990 0 

0 0 一 4.8990 


【 例 2-38] 计算 和 矩阵 的 逆 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


Clce,clear, close all 
A= [8,1,6; 
: 
4,9,2]; 
B= inv(A) 


运行 程序 ,输出 结果 如 下 : 


了 及 二 
0.1472 一 0.1444 0. 0639 
— 0.0611 0. 0222 0.1056 
一 0.0194 0.1889 一 0.1028 


C= norm(A) 


运行 程序 :输出 结 采 如 下 : 


本 本 一 
15 


2.S.1 和 证 阵 的 分 解 运 旬 


矩阵 的 分 解 背 用 于 求解 线性 方程 组 ,前 用 的 窍 阵 的 分 解 运 自如 表 2-9 所 示 。 


表 2-9 MATLAB 和 矩阵 分 解 函 数 


cig 特征 值 分 解 Cholesky 分 解 


lu schur Schur 分 解 


【 例 2-39】 和 矩阵 分 解 运算 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


>>A=[8,1,6;3,5,7;4,9,2]: 
>> [U,S,V] = svd(A) 竺 矩阵 的 奇异 值 分 解 , 有 =UxSxV 


运 辣 了 程序 ， 输出 < 结果 如 下 : 


U = 
— 0.5774 D0. T7071 D0. 4082 
一 0.5774 0.0000 一 0.8162 
一 0.5774 一 .7071 0.4082 

局 = 
12.0000 0 0 
0 6b. 9282 0 
0 0 3. 4641 

YY = 
— 0.5774 0.4082 0. 7071 
一 0.5714 一 0.8165 一 0.0000 
一 0.5774 0.4082 一 0.7071 


2.5.2 关系 运 并 和 过 和 辑 运 并 


除了 传统 的 数学 运算 外 ,MATLAB ri 和 人 逮 辑 运算 。 通 党 这 些 运 算 和 从 
和 上 数 的 目的 是 给 出 命题 的 真 假 : 从 而 控制 基于 中 假 命 题 的 MATLAB 命令 的 流程 或 执 
行 次 施 。 

当 关 系 表 达 式 和 逻辑 表达 式 作 输入 时 ,MATLAB di ea 0 数值 都 当 作 真 ,而 将 0 
当 作 假 ; 而 关系 表达 式 和 逻辑 表达 陈 的 输出 , 真 输出 1, 假 输出 0。 

表 2-10 给 出 了 基本 的 关系 运算 符 和 网 辑 运 算 符 。 


表 2-10 基本 关系 运算 符 和 逻辑 运算 符 


}: 国 尘 


一 
可 
[a 


-本 并 习 和 VTLYIN 


a7 
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经 表 
类 别 对 应 函数 
and 
逻辑 运算 符 or 
not 


此 外 ,MATLAB 还 提供 相关 的 关系 运算 图 数 和 逻辑 运算 图 数 , 如 表 2-11 所 示 。 
表 2-11 关系 运算 函数 和 人 逻辑 运算 函数 


any 所 有 元 素 均 不 为 0 时 为 真 
XOr 寻找 非 0 元 素 坐 标 
bitand 位 方式 的 逻辑 或 运算 
bitxor 位 方式 的 逻辑 异 或 运算 位 比较 运算 

bitshift 二 进 制 移 位 运算 


12.6 线性 方程 组 


在 线性 方程 组 4x 王 关中 ,4 是 nXm 的 系数 和 矩阵。 
(1) 当 二 m 且 非 奇异 时 ,此 方程 称 为 “ 恰 定 ”方程 。 
(2) 当 nn 二 m 时 ,此 方程 称 为 “ 超 定 ”方程 。 
(3) 当 nn 二 m 时 ,此 方程 称 为 “ 欠 定 ”方程 。 


2.6.1 人 短 阵 逆 和 [除法 解 恰 定 方程 组 


方法 有 两 种 : 

(1) 及 用 求 闻 运算: xX 二 inv(A) ，b:; 

(2) 采用 左 除 运算 : x 一 A\b， 

说 明 

(1) 由 于 MATLAB 订 循 IEEE 算法 ,所 以 即使 A 阵 奇 异 ,该 运算 也 照样 进行 。 但 在 
运算 结束 时 ,一 方面 给 出 上 告 ; 为 一 方面 ;所 得 逆 和 矩阵 的 元 系 虱 是 In{f( 无 穷 大 )， 

(2) 当 为 “病态 ”时 ,也 给 出 垄 告 信息 。 

(3) 在 MATLAB 中 , 求 逆 inv() 函 数 较 少 使 用 ,使 用 MATLAB 时 尽量 用 际 运 算 , 少 
用 逆 算 方法 。 

【 例 2-40】 为 了 了 对比“ 求 逆 ”法 和 “ 左 际 ”法 解 恰 定 方程 的 性 能 ,采用 如 下 指 令 进 行 融 
耻 恰 定 方程 组 的 对 比 人 研究 。 程 序 如 下 : 

clc,clear,close all 


format short 
rand( 'seed', 12); 车 随 机 人选 定 种 子 , 产 生 随 机 矩阵 


A= rand(500)+ 1.e8; 
X= oNnes(500,1): 
b=A*x xX; 

Al = cond(A}); 

disp ' 条 件数 为 :' 

Al 


运行 程序 .和 输出 结 朱 如 下 : 


条 件数 为 : 
中 由 “一 
17608292500131 


“ 求 逆 ” 法 解 恰 定 方 程 组 的 误差 . 残 差 和 所 用 计算 时 间 计 算 ,编程 如 下 : 


t1c 

A= rand(500) + 1.e8; 
XxX= Ones( 500 1) ; 
b=Ax XX; 

Xi= inv(A) x* b; 

toc 

erli = norm(x— xi) 
reli = norm(x— xi) 


运行 程序 :输出 结 采 如 下 : 


秆 使 A 的 随机 数 增 大 
名 500 行 零 矩阵 
先生 成 了 bb 


委 居 动 计时 器 

当 使 有 的 随机 数 增 大 
当 500 行 零 矩 阵 

和 生成 了 b 

和 求 北 


多 解 向 量 xi 与 真 解 向 量 的 2 范 数 误差 
告解 向 量 xi 与 真 解 向 量 的 2 范 数 残 差 


Elapsed time Is 0.202887 seconds. 


eri = 

85/21562 
Iel = 

85/21562 


“ 左 除 法 解 恰 定 方程 组 的 误差 \ 残 差 和 所 用 计算 时 间 计 算 :编程 如 下 : 


Le 

A= rand(500) + 1.e8; 
X= ones(500,1): 
b=AxX; 

xd = A\Db:; 

toc 

erd = norm(Xx— xd) 
red = norm(x— xd) 


运行 程序 ,输出 结 末 如 下 : 


第 启动 计时 器 

和 使 A 的 随机 数 增 大 
和 500 行 零 矩阵 

竺 生成 了 b 

币 求 递 


多 解 向 量 xi 与 真 解 向 量 的 2 范 数 误差 
先 解 向 量 下] 与 真 解 向 量 的 2 范 数 残 差 


Elapsed time Is 0.074632 seconds. 


二 

70/20357 
red = 

70/20357 


本 
1 
。 是 
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由 以 上 对 比分 析 可 知 : 

(1) 除法 求解 比 求 逆 求解 速度 明显 快 ,精度 相当 ; 但 “除法 ”的 相对 误差 几乎 是 “ 零 ”， 
而 “ 逆 阵 ”的 相对 残 差 高 得 多 。 

(2) MATLAB 在 设计 求 道 函数 inv(C) 时 ,采用 的 是 高 斯 (Gauss) 消 元 法 。 

(3) MATLAB 在 设计 “ 左 除 ”运算 解 恰 定 方程 时 ,并 不 求 道 阵 , 而 是 直接 采用 高 斯 消 
元 法 求解 ;有效 地 减 小 了 误差 和 残 差 ,能 得 到 较 好 的 结果 。 


2.6.2 年 阵 除法 解 超 定 方程 组 


方法 有 两 种 : 

(1) 求 正 规 方程 组 (4 A)x 一 A'b 的 解 。 

《2) 用 Householder 变换 直接 求 原 超 定 方程 的 最 小 二 乘 解 。 

由 于 第 2 种 方法 采用 的 是 正 交 变换 , 据 最 小 二 乘 理 论 可 知 : 第 2 种 方法 所 得 的 解 的 
准确 性 .可 靠 性 都 比 第 1 种 方法 好 得 多 。MATLAB 解 超 定 方程 组 用 的 就 是 第 2 种 方法 。 

【 例 2-41】 用 矩阵 除法 求解 超 定 方程 组 。 编 程 如 下 : 


省 矩阵 除法 求解 超 定 方程 组 
clc,clear,close all 
format short 
a= [1,2,3; 

"Pe 

1,8,9; 

10 — 11|]; 
b= [1:4]"; 
x 二 a\b 


0.4621 
一 0.0147 
0.0051 


2.6.3 年 阵 除法 解 欠 定 方 程 组 


人 欠 定 方程 组 4Ax 一 的 解 不 是 唯一 的 。 用 除法 运算 所 得 的 解 有 两 个 重要 的 特征 : 
(1) 在 解 中 至 多 有 A 的 秩 个 非 零 元 素 。 

(2) 它 是 这 个 类 型 中 范 数 最 小 的 一 个 。 

【 例 2-42】 用 算 阵 除法 求解 天 是 方 程 组 。 编 程 如 下 : 


争 和 矩阵 除法 求解 和 欠 定 方程 组 
2 
a i pr 


2.7 符号 运算 


MATLAB 不 仅 在 数值 计算 功能 方面 相当 出 色 , 在 符号 运算 方面 也 提供 了 专门 的 符 
号 数学 工具 箱 (symbolic math toolbox) 一 一 MuPAD Notebook 。 

符号 数学 工具 箱 是 操作 和 解决 符号 表达 式 的 符号 函数 的 集合 ,其 功能 主要 包括 符号 
表达 式 与 符号 矩阵 的 基本 操作 、 符 号 微 积分 运算 以 及 求解 代数 方程 和 微分 方程 。 

符号 运算 与 数值 运算 的 主要 区 别 在 于 : 数值 运算 必须 先 对 变量 赋值 ,才能 进行 运算 ， 
符号 运算 无 须 事 和 匈 对 变量 进行 赋值 ,运算 结 采 直接 以 符号 形式 和 输出。 


2.7.1 符号 表达 式 的 生成 


在 符号 运算 中 ,数学 、 隐 数 、 算 于 和 变量 都 是 以 学 符 的 形式 保存 并 进行 运算 的 。 符 号 
表达 式 包 插 和 从 号 靖 数 和 和 全 号 方程 ,两 者 的 区 别 在 于 前 者 不 包括 等 号 ,后 者 必须 市 等 号, 但 
它们 的 创建 方式 是 相同 的 。 

MATLAB 中 创建 得 号 表 达 式 的 方法 有 两 种 : 一 种 是 直接 使 用 字符 串 变 量 的 生成 方 
法 对 其 进行 赋值 ; 男 一 种 是 根据 MATLAB 提供 的 符号 变量 定义 图 数 sym() 和 syms() 。 

sym() 隐 数 用 来 定义 单个 全 号 量 , 调 用 格式 为 : 

符号 量 名 = sym(' 符 号 字符 囊 ') 

其 中 ,和 号 字符 串 可 以 是 第 量 、 变 量 、 晴 数 或 表达 式 ，。 

syms() 畏 数 用 来 建立 多 个 和 从 写 变 量 , 调 用 格式 为 : 

syms 符号 量 名 1 符号 量 名 2 … 符 号 量 名 了 

此 时 变量 名 不 需 加 字符 串 分 界 符 (0  ) ,变量 则 用 空格 分 隔 。 

【 例 2-433 和 从 号 表 达 式 的 生成 。 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


Ld 
bs 这 
pe J 
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clc,clear,close all 


vl pl 当 直接 创建 符号 函数 

equ= "a XX"*2+bxxt+c=0'; 各 直接 创建 符号 方程 

Y2 = sym( 'exp(x)'); 车 使 用 sym 函数 生成 符号 表达 式 
syms XxXy 和 建立 符号 变量 XxX、y 
V2 和 生成 符号 表达 式 


运行 程序 ,输出 结果 如 下 : 


Yl = 
exp(x) 
equ = 
者 区 工人 个 必 十 bx 区 十 亡 二 0 
Y2 = 
exp(x) 
二 
下 人 十 本 个 2 


2.7.2 符号 矩阵 


符号 矩阵 也 是 一 种 特殊 的 符号 表达 式 。MATLAB 中 的 符合 矩阵 也 可 以 通过 sym 
函数 来 建立 ,矩阵 的 元 素 可 以 是 任何 不 带 等 号 的 符号 表达 式 。 其 调用 格式 为 : 

符号 矩阵 名 = sym(' 符 号 字符 串 抵 阵 ') 

符号 字符 串 矩 阵 的 各 元 素 之 间 可 用 空格 或 逗号 分 割 。 

【 例 2-44】 符号 矩阵 示例 。 

在 MATALB 命令 窗口 输入 命令 如 下 


A= sym('[aa,bb;l,a+2x*x*b]') 
运行 程序 ,输出 结果 如 下 : 
玉 0= 


[ aa, bb | 
[ i,a+ 2xb] 


输入 命令 如 下 : 


clce,clear,close all 


A= svn(l [a,b;l,a+2%b,1,2;4,5]") 


运行 程 订 ,输出 结果 如 下 : 


= 
[ a, b, 0, 0] 
[ i,a+ 2x*b, 1, 2] 
[ 4, 5, 0, 0] 


从 输出 结 末 可 以 看 出 ,与 效 值 矩阵 输出 形式 不 同 , 行 号 矩阵 的 每 一 行 两 端 部 有 方 


在 MATLAB 中 ,数值 矩阵 不 能 直接 参与 伯 写 运算 ;必须 先 转换 为 全 号 矩 隆 , 同 样 也 
是 通过 sym( 〇 函数 来 转换 。 

得 号 算 阵 也 是 一 种 算 阵 :因此 之 前 介绍 的 窍 阵 的 相关 运算 也 适用 于 符 所 矩阵。 很 多 
应 用 于 数值 矩阵 运算 的 因数 .如 det() ,inv() ,rank() ,eig()、diag()、triu() ,tril() 等 ,也 能 


应 用 于 符 扎 窍 阵 。 
特写 和 矩阵 的 闷 : 
>> inv(A) 
Aans = 
[ (a+ 2xb)/(axaa 一 bb+ 2xaaxb), -bb/(axaa — bb+ 2xaaxb)] 
[ -lil/(axaa— bb+ 2xaaxb), aa/(axaa 一 bb+ 2xaaxb)l] 
和 人 号 矩阵 的 秩 : 
>> rank(A) 
ams = 
2 


>> triu(A) 

ans = 
[ aa, bb| 
[0,.a+ 2xb] 


>> tril(n) 
ans = 
[ aa, 0] 


[ 1,a+ 2x*b] 


2.7.3 和 常用 符号 运算 


行 写 数学 工具 箱 中 提供 了 符号 和 矩阵 因 式 分 解 、 展 开 、 合 并 ,简化 和 通 分 等 行 号 操作 员 
数 ,如 表 2-12 所 示 。 
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表 2-12 常用 符号 运算 函数 


factor ”| 符号 矩阵 因 式 分 解 符号 矩阵 展开 

collect “| 符号 矩阵 合并 同 可 应 用 函数 规则 对 符号 矩阵 进行 化 简 
compose 合 明 数 \ [inverse 反 晴 数 运 算 

limit 计算 符号 表达 式 宰 了 符号 积分 ( 定 积分 或 不 定 积分 ) 

diff 微分 和 差分 图 数 gradient 近似 梯度 函数 

jiacobian | 计算 多 元 函数 的 Jacobi 矩阵 | | 


由 于 微 积 分 是 大 学 教学 .科研 及 工程 应 用 中 最 重要 的 基础 内 容 之 


微 积分 运算 进行 举例 说 明 , 其 余 的 全 号 限 数 运算 ,读者 可 以 通过 查阅 MATLAB 的 帮助 


文档 进行 学 习 。 
【 例 2-45〗 符号 微 积 分 运算 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


>> syms 七 xy 多 定义 符号 变量 
>> f1 = sin(2 x x); 
>> df1 = diff( £1) 向 对 函数 llL 中 变量 开 求 盾 


运 丫 了 程序 ， 输出 结果 如 下 : 


ED = 


2x%* Cos(2 * xX) 


>> f2=x*2+y’2; 
>> df2 = diff(f2,x) 秆 对 渤 数 £2 中 变量 交 求 含 导 


运行 程序 ,输出 结果 如 下 : 


di2 


攻关 玉 


输入 命令 如 下 : 


>> £f3=xx sin(x*t}); 


>> intl = int(f3,x) 竺 求 函数 £3 的 不 定 积 分 


1 了 程序， 输出 < 结果 如 下 : 


intl = 
(sin(t x x) 一 tx x cos(tx x))})/t*2 


输入 命令 如 下 : 
> int2 = int{(£3,x,0, pi/2) 竺 求 f3 在 [0,pi/2] 区 间 上 的 定 积 分 


运行 程序 ,输出 结果 如 下 


int2 = 
(sin( (pixt)/2) — (pixtxcos((pixt)/2))/2)/t “2 


2.8 复数 及 其 运算 


复数 运算 从 根本 上 讲 是 对 实数 运算 的 拓展 ,在 目 动 控制 .电路 和 尝 科 等 目 然 科 学 与 工 
程 拉 术 中 复数 的 应 用 非 弟 广泛 。 


2.8.1 复数 和 复 卸 阵 的 生成 


复数 有 两 种 表示 方式 : 一 般 形 式 和 复 指 数 形 式 。 
一 般 形 式 为 x+ 二 a 十 Fi, 其 中 为 实 部 ,b 为 虚 部 ,i 为 虚数 单位 。 在 MATLAB 中 ,使 
用 赋值 语句 : 


>> syms ab 
>> X=a+bxi 
下 二 


评 十 bx1i 


即 可 生成 复数 +。 其 中 ,a.5 为 任意 实数 。 
复 指数 形式 为 + 二 +r* e*, 其 中 为 复数 的 模 ; 9 为 复数 的 幅 角 ; i 为 虚数 单位 。 在 
MATLAB 中 ,使 用 赋值 语句 : 


> SVYmS I theta 
>> X= I exp(theta * 1) 
下 < 


工 兴 exp(theta * 1) 


即 可 生成 复数 +。 其 中 ,rtheta 为 任意 实数 。 

选取 合适 的 表示 方式 能 够 便于 复数 运算 ,一般 形式 适合 处 理 复数 的 代数 运算 , 复 指 
数 形式 适合 处 理 复数 旋转 等 涉及 幅 角 改变 的 问题 。 

复数 的 生成 有 两 种 方法 : 一 种 是 直接 赋值 :如 上 所 述 ; 男 一 种 是 通过 符号 函数 syms() 
来 构造 ,将 复数 的 实 部 和 虚 部 看 作 自 变量 ,用 subs() 图 数 对 实 部 和 虚 部 进行 赋值 。 

【 例 2-46】 复数 的 生成 。 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


- 沽 有 施 上 HEVTLVN 下 图 辣 


1 
| 
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clc,clear, close all 

xl= 一 1+2i 当 直 接 赋 值 
x2 = sqrt(2) x exp(i x pi/4) 

syms a b real 


X 了 3 三 忆 十 坊 关 工 当 构造 符号 函数 
subs(x3, {a,b},{— 1,2}) 秆 使 用 subs 函数 对 实 部 和 虚 部 赋值 


运行 程序 :输出 结 有 如 下 : 


X] 三 
一 1.0000 十 2.00001 

x2 一 
1.0000 十 1.00001 


十 bz¥xli 
aANns = 
一 1 二 21 


输入 命令 如 下 : 


clc,clear,close all 

syms 工 theta real 

xd= rx exp(theta * 1); 

subs(xd, {r,theta}, {sart(20),pi/8}) 


运行 程序 ,输出 结果 如 下 : 


2 5°(1/2) x ((2°(1/2)Y + 2)*(1/2)/2 + ((2 二 2*(1/2))*(1/2) #1)/2) 
复数 和 矩阵 的 生成 也 有 两 种 方法 : 一 种 是 直接 输入 复数 元 素 生 成 ; 男 一 种 是 将 实 部 和 
虚 部 和 矩阵 分 开 建 立 ,再 写成 和 的 形式 ,此 时 实 部 和 矩阵 和 虚 部 和 矩阵 的 维度 必须 相同 。 
【 例 2-47】 复数 矩阵 的 生成 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


clc,clear,close all 
A=[ -1+20i,—3+ 40i;1— 20i,30— 4i] 竺 复数 元 素 


运行 程序 ,输出 结果 如 下 : 
天 下 王 


一 1.0000 二 20.00001 一 3.0000 + 40.00001 
1.0000 一 20.00001 30.0000 一 4.00001 


和 矩阵 4 的 实 部 : 


real(lA) 


+ 加 局 


本 
a 


运行 程序 ， 输出 结果 如 下 : 


>> reall(A) 


ans = 


| 
| 
| 
LU 
--- 台 I 六 凡 YTLYW 


和 矩 阵 A 虚 部 矩阵 如 下 : 


imag(A) 


运行 -程序 ， 辆 YH ! 结 果 如 下 : 


>> imag(A) 


ans = 
20 40 
一 20 一 归 


由 和 矩阵 A 的 实 部 和 虚 部 构造 复 癌 量 和 矩阵 如 下 : 
B= real(A); 


C= imag(A); 
D=B+i+Cx1 


运行 程序 ;输出 结果 如 下 : 


于 三 
一 1.0000 +20.00001 一 3.0000 + 40.00001 
1.0000 一 20.00001 30.0000 一 4.00001 


2.8.2 复数 的 运算 


复数 的 基本 运算 与 实数 相同 .都 是 使 用 相同 的 运算 符 或 图 数 。 此 外 ,MATLAB 还 提 
供 了 一 些 专门 用 于 复数 运算 的 图 数 ,如 表 2-13 所 示 。 


表 2-13 复数 运算 函数 


i 求 复 数 或 复数 矩阵 的 模 求 复数 或 复数 矩阵 的 幅 角 ,单位 为 弧度 
| 求 复数 或 复数 矩阵 的 实 部 求 复数 或 复数 矩阵 的 虚 部 


conj 求 复 数 或 复数 矩阵 的 共 示 isreal 判断 是 否 为 实数 
unwrap 去 挥 帆 角 突变 cplxpair | 按 复数 共 恩 对 排序 元 素 群 
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2.8.3 留 数 运算 


留 数 定义 ; 设 a 是 f(z) 的 孤立 奇 点 ,C 是 a 的 充分 小 的 邻 域 内 一 条 把 a 点 包含 在 其 
内 部 的 闭路 ， 积分 元 中 /=)dz 称 为 f(z) 在 a 点 的 留 数 或 残 数 , 记 作 Res[ f(z) ,oa]。 


留 数 定理 : 如 采 归 数 f(z) 在 闭路 C 上 解析 ,在 C 的 内 部 际 去 7 个 孤立 奇 护 al， 
az yan 外 也 解析 :, 则 闭路 上 的 积分 满足 


下 一 ] 


于 是 通过 留 数 定理 可 以 将 闭路 积分 转化 为 何 单 的 代数 运算 。 
通 第 在 工程 中 f(z) 大 多 为 有 理 分 式 , 即 
FC2) = BC) 二 和 “十 Be” | 


A(z=) ailz” 十 azzm 二 "十 Qamn 


在 MATLAB 中 , 留 数 的 计算 可 以 通过 六 数 residue() 实 现 。 其 调用 格式 如 下 : 


[Ir,pk|] = residuel(b,a) 


其 中 ,输入 量 b\a 为 有 理 分 式 的 分 子 分 母系 数 和 矩阵 ,输出 量 r、p\kk 分 别 表 示 留 数 , 极 
太 及 部 分 分 式 展开 的 耳 接 项 。 
若 分 式 无 重 根 ,极点 数目 n= 二 length(a) 一 1 一 length(7r) 二 length(p)。 若 length(b) 一 
length(a) ,直接 项 上 为 空 ; 否则 ,length(CRE) 一 length(Cb) 一 lengthCa) 十 1]1。 
分 式 展 开 形 式 为 
B(z=) rl 


Fk Ty 


二 - 一 0 | hie RCO) 
A(z=) 多 一 pi 之 一 ps, 党 
如 果 存 在 mr 重 极 点 , 即 有 pO)= 二 …= 二 pO 十 m 一 1) ,那么 展开 式 中 包含 以 下 形式 : 
ri z [| - | | Fj+m—1l 
二 2— pi)™ 


[b,a] 二 residue(r,p,k) 则 为 上 述 运 算 的 逆 运 算 , 输 入 量 为 r.pk, 输 出 量 为 ba 
; . , | 1 Te 
【 例 2-48〗 求 函 数 /(<) 一 圭一 在 奇 点 处 的 留 数 。 


在 MATLAB 命令 窗口 输入 命令 如 下 : 


Clc,clear,close all 
[a,b,c| = residue([1,1|,[1,1,01]) 


运行 程 订 ,输出 结 末 如 下 : 


忆 三 
0 
1 

b = 
1 
0 


1 
1 
1 
四 


[ 


留 数 的 逆 运 算 如 下 : 


[c,d|] = residue(a,b,c) 


运行 程 订 . 输 出 结果 如 下 : 


因此 ,可 得 Resl f(z), 一 1 | 二 0,Res| f(z),0|= 二 1。 


【 例 2-49】 计 


算 积分 和 所 二 和 d=, 其 中 C 为 正 向 圆周 ,|=| 一 1.。 


首 和 抑 求 出 被 积 果 数 在 奇 点 处 的 留 数 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


Clc,clear, close 


= 


[a, b,c] = residue([1,1],[1,0,0,0,11) 


运行 程序 ,输出 结 来 如 下 : 


0. 1768 + 0.0732i 
0. 1768 — 0.0732i 
— 0.1768 — 0.4268i 
— 0.1768 + 0.4268i 
= 
— 0.7071 + 0.7071i 
— 0.7071 — 0.7071i 
0.7071 + 0.7071i 
0.7071 — 0.7071i 
SS 
[] 
因此 ,在 圆周 |z| 王 1 内 有 4 个 极点 ,分 别 六 0. 1768 十 0. 07321、0. 1768 一 0. 07321i、 


一 0. 1768 一 0. 42681 


\ 一 0.1768 一 0. 42681。 


2.8.4 泰 鄙 级 数 展 开 


泰勒 (Taylor) 级 数 展开 在 复 变 果 数 中 占据 重要 的 地 位 ,特别 在 ( 复 ) 信 号 分 析 处 理 中 


等 应 用 较 厂 泛 。 


--- 名 I 记 及 HYVTTLYW 


MATLAB 科 学 计算 


车 函数 /(z) 在 包含 ze 点 的 邻 域内 各 阶 导 数 广 (z) ,六 (z)，…,7o Crz),… 存 在 , 则 
f(T) 可 以 在 xo 的 邻 域内 展开 成 + 一 xo 的 窜 级 数 : 
Fx ) 一 f(xo 十 fF (ro )( 工 一 X02 才 *…* 十 


和 (Xo) (TO— TXTo)” 


上 
nl 
此 和夫 级 数 称 为 f(x) 在 点 I 王 xo 的 泰勒 级 数 。 


在 MATLAB 中 ,和 泰勒 级 数 展 开 可 以 通过 娟 数 taylor() 来 实现 。 其 调用 格式 为 : 


taylor(fun,v,n,x0) 


其 中 ,fun 为 得 展开 隐 数 ; v 为 展开 所 依据 的 日 变量, 其 默认 值 由 了 数 findsym() 确 
定 ; 7 为 系 勒 展开 的 项 数 , 即 展开 到 7 一 1 次 蜂 : 其 默认 值 为 6; x0 为 指定 展开 的 点 即 上 述 
的 ro ,其 默认 信 为 0。 

【 例 2-50】 求 下 列 图 数 的 和 磁 惑 级 数 展 天 式 : 

(1) fi (x)=e” ,xo=0.717 (2) fe(x)=sin(27x), xo= rx/8 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


Clc,clear,close all 

SYms X; 

£f1 = tavlor(exp(2 * x),x,0.717) 
E2 = taylor(sin(2 # x), x, pi/8) 


运行 程序 ,输出 结果 如 下 : 


1 = 

exp(717/500) + 2*x% exp(717/500) * (x 一 717/1000) + 2x# exp(717/500) * (x 一 717/1000)“2 
+ (4# exp(7T17/500) * (x — 717/1000})*3)})/3 + (2 x exp(717/500) ¥ (x — 717/1000})*4)/3 + 
(4 x exp(7T17/500) x (x — 717/1000)*5)/15 

E20 

(2 2*(1/2) x (pi/8 一 x)*3)/3 一 2°*(1/2) * (pi/8 一 x})*2 + (2°*(1/2) * (pi/8 — x})“4)/3 — 
(2x% 2°*(1/2) x% (pi/8 一 x)*5)/15 + 2°(1/2)/2 一 2°*(1/2) *% (pi/8 一 x) 


2.8.5 傅 里 叶 变 换 及 其 闭 变 换 


傅 里 叶 (Fourier) 变 换 是 数字 信号 处 理 领域 的 重要 工具 。 傅 里 叶 变换 及 其 道 变换 之 
间 各 有 优势 : 傅 里 叶 变 换 可 以 清晰 地 反映 信号 的 频 域 特性 ,在 MATLAB 中 提供 了 全 里 
叶 变换 及 其 道 变换 使 用 的 函数 ,使 用 较为 方便 。 

在 MATLAB 中 , 侍 里 叶 变 换 及 其 逆 变 换 的 调用 格式 如 下 : 

(1) F 一 fourier(f,t,w)。 其 中 ,了 为 时 域 函数 表达 式 ; t 为 时 域 变量 ; w 为 频 域 变量 。 

(2) {二 ifourier(F,w,t)。 其 中 ,下 为 频 域 函 数 表 达 式 ; w 为 频 域 变量 ; t 为 时 域 


【 例 2-51】 求 函 数 /7) 一 三 的 傅 里 叶 变 换 下 并 求 下 的 道 变换 。 
在 MATLAB 命令 窗口 输入 命令 如 下 : 


clc,clear,close all 
symstw 

上 = 2/t; 

F = 二 OurIier( 芋 ,七 ,WwW) 


运行 程序 ,输出 结果 如 下 : 


-一 宫 i 关 和 污 HYTLYW 长 国内 


= 
pix (2x heaviside( —w) 一 1)x2x1 


傅 里 叶 逆 变换 如 下 : 
vl = ifourier(F,w,t) 
运行 程序 ,输出 结果 如 下 : 


yi = 


[2m 0_ v0 


因此 ,函数 /1 二 二 的 传 里 叶 变 换 为 P(e) 一 J .Fo) 的 道 变换 即 
10 其 i 


1 


为 原 函 数 。 
2.8.6 拉 普 拉 斯 变换 及 其 逆 变 换 


通过 拉 普 拉 期 (Laplace) 变 换 能 够 得 到 系统 传递 图 数 的 雪上 点 和 极点 分 布 , 从 而 判断 该 
系统 的 稳定 性 以 及 可 徘 性 ,因此 在 信号 分 析 人 处 理 中 应 用 较为 广泛 。 

在 MATLAB 中 , 拉 普 拉 斯 变换 可 以 通过 函数 laplace() 来 实现 , 拉 普 拉 斯 道 变 换 可 
以 通过 上 盟 数 ilaplace() 来 实现 。 它 们 的 调用 格式 为 : 

(1) LL 二 laplace(f,t,s)。 其 中 ,了 为 时 域 函 数 表达 式 ; t 为 时 域 彼 量 ; 为 s 域 变量 。 

(2) {二 ilaplace (L,s,t)。 其 中 ,L 为 s 域 邹 数 表达 式 ; 为 * 域 变量 ; 上 为 时 域 变 量 。 

【 例 2-S2】 求 滑 数 (72) 二 5，e” 的 拉 普 拉 斯 变换 LL 并 求 上 的 逆 变 换 ， 

在 MATLAB 命令 窗口 输入 命令 如 下 : 


symst sab 
f= bx exp(a * tt).; 
L= laplace(f, +t,s) 


运行 程序 ,输出 结果 如 下 : 


T= 
-b/(a 一 8) 
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拉 普 拉 斯 逆 变换 如 下 : 


fl1= ilaplace(L,s,t) 


运行 程序 ,输出 结 采 如 下 : 


FE 
bx exp(a * tt) 


因此 ,上 曙 数 f(2) 二 5，e” 的 拉 普 拉 斯 变换 为 L(s)=- (的 逆 变 换 即 为 原 颗 数 。 


2.8.7 ZZ 变换 及 其 道 变 换 


在 MATLAB 中 ,和 “变换 是 拉 普 拉 斯 变换 的 一 种 变 插 形式 :能够 很 好 地 实现 系统 的 分 
析 ,加 局 分 析 速 度 ,因此 Z 亚 换 也 是 较 第 应 用 的 一 种 方法 。 

Z 挛 换 可 以 通过 了 肾 数 ztrans() 来 实现 ,Z 六 变换 可 以 通过 因数 iztrans() 来 实现 。 碟 
们 的 调用 格式 为 : 

(1) F 二 ztrans(f{,n,z)。 其 中 ,了 为 时 域 哨 数 表达 式 ; n 为 离 敌 时 域 变 量 ; z 为 复 频 域 

(2) {二 1ztrans(F,z,n)。 其 中 ,下 为 复 频 域 晴 数 表 达 式 ; z 为 复 频 域 变 量 ; 7 为 离散 
时 域 变 量 。 

〖【 例 2-53] 求 图 数 太一 sinCae。 70) 的 ZZ 空 换 FF 并 求 F 的 首 变 换 ， 

在 MATLAB 命令 窗口 输入 命令 如 下 : 

SYMNMS NzZa 


f= sin(ax n); 


F= ztrans(f,n,z) 


运行 程序 ,输出 结果 如 下 : 


EF = 
(zx sin(a))/(z*2 一 2x%cos(a) *z++ 1) 


Z 逆 变 换 如 下 : 


fl1= iztrans(F,z,n) 


Ie 行程 友 ， 输出 : 结果 如 下 : 


>> z1 = iztrans(F, z,n) 
zj] = 


sin(a x n) 


sina)z |， z 
因此 ,上 果 数 ff(n) 二 sin(a*， nn) 的 ZZ 变换 为 F(z) = Pz) 的 道 迹 


1—2(cosa)z 
换 即 为 原 靖 灼 。 
2.9 多项式 求解 


多 项 式 方式 的 约定 为 pC2) 二 aox" 十 mz”! 十 … 十 as_ix 十 a 用 以 下 系数 行 向 量 表 
示 : 力 一 [Lao yalyaz arlyar] 。 多 项 式 行 回 量 的 创建 方法 有 以 下 两 种 : 
(1) 多 项 陈 系 数 回 量 的 百 接 输 入 法 。 
(2) 利用 指令 jp 二 poly(AR) ,产生 多 项 式 系数 向 量 。 
右 AR 是 方 阵 , 则 多 项 陈 为 特征 多 项 陈 ; 夺 AR 是 回 量 , 即 AR 一 [Larryarz， :ar |， 
则 所 得 到 的 多 项 式 满 足 : 
《 交 一 让 六) 人 一 Cr) 二 一 Cg 一 Cr ) = Ao0r Tar 


【 例 2-54】 求 三 阶 方 阵 4 的 特征 多 项 式 。 编 程 如 下 : 


二 二 az 二 a 


clce,clear,close all 

a= [ll1:13;:;14:16;20:221]; 
al = poly(a) 

a2 = poly2str(al,'s') 


运行 程序 :输出 结 有 如 下 : 


下 三 

1] .0000 一 48.0000 一 27.0000 0.0000 
aAZ2 二 

Ss”*3 — 48 s*2— 279++ .6zlde 一 14 


值得 注意 的 是 : 

(1) n 阶 方 阵 的 特征 多 项 式 系 数 回 量 一 定 是 2 十 1 维 的 。 

(2) 特征 多 项 式 回 量 的 第 一 个 元 素 必 是 1。 

【 例 2-55】 给 定 根 向 量 求 多 项 式 系 数 回 量 。 编 写 程序 如 下 : 


Clc,clear,close all 
r=[—0,.5,3,.61+ 23]; 
Il = poly(r) 

I2 = real(rl) 


r3= poly2strlr2, 'x"') 


运行 程序 ,输出 结 采 如 下 : 


rl1 = 
Columns 1 through 3 
1.0000 + 0.00001 一 14.0000 一 1.00001i 63.0000 十 8.00001 
Columns 4 through 5 
一 30.0000 一 15.00001 0.0000 + 0.00001 


国 沪 
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2 
1 — 1 63 — 90 0 
I3 三 
XA ll4x3+ 63x2— 90x 
由 结果 可 知 : 


(1) 要 形成 实数 多 项 式 :, 根 回 量 中 的 复数 必须 共 斩 成 对 。 

(2) 可 采用 取 实 部 的 指令 real() 把 虚 部 值 去 掉 。 

(3) poly2str() 是 一 个 图 数 文件 , 它 存 在 于 MATLAB 控制 工具 箱 中 。 

常用 的 多 项 式 运 算 指 令 有 : 

(1) 民 二 roots(p)。 求 多 项 式 和 品 量 p 的 根 ， 

(2) PS 二 polyval(P;S)。 按 照 数 组 运算 规则 计算 多 项 式 值 。P 为 多 项 式 ,S 为 矩阵 。 
(3) PS 一 polyvalm (P;S)。 按 照 数 组 运算 规则 计算 多 项 式 值 。P 为 多 项 式 ,S 为 


(4) [r,p,k |] 二 residue(b,a)。 部 分 分 式 展 开 。b.a 分 别 是 分 了 于、 分 母 多项式 系 数 回 
rp\k 分 别 为 留 数 、 极 点、 下 项 回 量 。 

(5) P 二 polyfit(x,y,n)。 用 nn 阶 多 项 式 拟 合 x、y 癌 量 给 定 的 数据 。 

【 例 2-56】 求 多 项 式 z 一 6z 一 727z 一 27 的 根 。 编 程 如 下 : 


Clce,clear, close all 
r= roots([1, 一 6, -72,— 27]) 


运行 程 订 ,输出 结 末 如 下 : 


工 一 
2.1229 
— 5.7345 
一 0.3884 


说 明 : MATLAB 约定 多 项 式 系 数 用 行 品 量 表示 ,一 组 根 用 列 品 量 表示 。 
【 例 2-57】 求解 两 种 多 项 式 求 什 指令 的 差别 。 编 程 如 下 : 


clc,clear,close all 
s= pascal(4) 

= poly(s) 
证 poly2str(p, 'x') 
p2 = polyval(p, s) 
p3 = polyvalm(p, s) 


运 行程 I 输出 结果 如 下 : 


“= 
1.0000 一 29.0000 2.0000 一 29.0000 1.0000 


pl = 
xd4 一 29x3 + 72x2 一 29x+1 
B2 = 
1.0e+04 x* 
0.0016 0.0016 0.0016 0.0016 
0.0016 0.0015 一 0.0140 一 0.0563 
0.0016 -0.0140 -0.2549 一 1.2089 
0.0016 一 0.0563 一 1.2089 一 4.3779 
E390= 
1 .0e 一 10 * 
一 0.0014 -0.0064 -0.0105 一 0.0242 
-0.0049 -0.0220 一 0.0362 一 0.0801 
一 0.0116 一 0.0514 -0.0827 一 0.1819 
-0.0230 一 0.0976 -0.1567 一 0.3424 


由 输出 结 采 可 知 ,p3 中 的 元 系 午 很 小 : 它 是 运算 误差 造成 的 。 理 论 上 它 应 该 是 0。 
这 就 是 著名 的 Caylay-Hamilton 定理 : 任何 一 个 窍 阵 满 足 它 本 身 的 特征 多 项 陈 。 


【 例 2-S8】 六 阶 多 项 式 对 区 间 L0,2.5」 上 的 误差 图 数 y(x) 一 yt 进行 最 小 
二 乘 拟 合 。 编程 如 下 : 


三 人 :0.112.535- 

y= erf(x) 对 计算 误差 函数 在 [0,2.5] 的 数据 点 
p= polyfit(x, y,6) 

pl = poly2str(p, 's') 


运行 程序 ,输出 结果 如 下 : 


p = 
0.0084 — 0.0983 0.4217 — 0.7435 0.1471 1.1064 0.0004 
pl = 
0.0084194 s^6 — 0.0983 s*5 + 0.42174 s*4 — 0.74346 s *3 + 0.1471 s “2 
+ 1.1064 s + 0.00044117 


【 例 2-59】 用 LO0.2.5j 区 则 数据 拟 合 曲线 拟 合 L0,5j 区 则 的 数据 。 编 程 如 下 : 


clc,clear,close all 

二 和 01- 

w=. 1:2.5- 

到 二 EU 

yl = eIE(XL) ; 

pl = PolyEitt(xl YL 6) 

E = polyval(pl,x) 

plot(x, vy, 'bo', '] inewidth', 2) 
hold on 

plot(x, f, rr —— ,linewidth',2) 


grid on 
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axis!( [0, ip 0, 2] ) 
legend( ' 拟 合 曲 线 ', ' 原 始 数 据 ') 


运行 程序 ,输出 结果 如 下 : 


= 

Columns 1 through 5 

0.0004 0.1119 0. 2223 0. 3287 0. 4288 
Columns 6 through 10 

0.5209 0.6041 0.6778 0.7418 0.7965 
Columns 11 through 15 

0.8424 0.8800 0.9104 0.9342 0.9526 
Columns 16 through 20 

0.9664 0.9765 0.9838 0.9889 0.9925 
Columns 21 through 25 

0.9951 0.9969 0.9982 0.9991 0.9995 
Columns 26 through 30 

0.9994 0.9984 0.9964 0.9931 0.9882 
Columns 31 through 35 

0.9818 0.9737 0.9642 0.9539 0.9434 
Columns 36 through 40 

0.9341 0. 9277 0.9267 0.9339 0.9533 
Columns 41 through 45 

0.9897 1.0488 1.1375 1.2640 1.4380 
Columns 46 through 51 

1.6706 1.9745 2.3646 2.8574 3.4718 4.2290 


输出 图 形 如 图 2-2 所 示 。 


| 1 
1 1 1 o 报 合 曲线 凡 _ 
相 ---- 原 始 数据 了 
| 


I | | I :| 

一 一 一 一 一 叫 一 一 一 才 一 一 一 站 一 一 一 全 一 一 一 拓 一 一 一 | 一 一 一 一 一 - 
| | | | | 
| I | | 

se i 


| b= I I | | 1 
I | | | | | 
ee 
| 


| 
本 


图 2-2 曲线 拟 合 


本 章 小 结 


MATLAB 的 科学 计算 包括 多 方面 ,涵盖 面 极 广 ,本 章 主 要 围绕 和 矩阵 运算 、 符 号 和 矩阵 
运算 .复数 矩阵 运算 等 进行 分 析 。 通 过 本 章 基 础 编程 和 学习, 用 户 可 以 根据 自身 需求 ,进行 
程序 的 编写 和 困 数 调用 ,MATLAB 对 于 和 矩阵 的 运算 表现 极 好 的 运算 能 力 。 
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MATLAB 语言 丰富 且 功 能 转 越 的 图 形 可 视 化 功能 ,使 得 数学 计 
算 结 果 可 以 方便 地 .多 样 地 实现 可 视 化 。 这 是 其 他 编程 语言 所 不 能 及 
的 ,而 且 得 到 的 图 形 可 方便 地 插入 Word 和 LaTeX 等 其 他 排版 系统 。 
MATLAB 图 形 可 视 化 操作 分 析 了 管见 二 维 、 三 维 图 形 绘 制 , 以 太 
MATLAB 动画 设计 ,方便 用 户 进行 可 视 化 设计 。 

学 习 目 标 : 

。 熟练 掌握 MATLAB 编程 表示 方法 ; 

。 熟练 运用 MATLAB 产生 可 视 化 图 形 ; 

。 熟练 掌握 MATLAB 进行 动画 设计 等 。 


3.1 图 形 绘制 

基于 由 浅 和 这 的 原则 ,本 六 将 从 最 和 侧 单 的 平面 上 的 点 的 表示 人 
手 ,逐步 深入 ,由 离散 数据 的 表示 到 连续 数据 的 表示 ,使 得 读者 易于 党 
握 其 中 规律 。 
3.1.1 离 天 数据 图 形 绘制 

一 个 二 元 实数 标量 对 (zxo,yo) 可 以 用 平面 上 的 点 来 表示 ,一 个 二 


元 实数 标量 数组 | (zi V1 (Ta Va) (Tn Yn -| 可 以 用 平面 上 的 一 组 点 
来 表示 ,对 于 离散 函数 了 二 /(X), 当 X 为 一 维 标量 数组 X 一 [za ,zz ,…， 


zj 时 ,根据 晒 数 关系 9] 以 求 出 YY 相应 地 为 . - 维 标 量 Y= | yi "V2 a . 


Ya | 

当 把 这 两 个 向 量 数组 在 直角 坐标 系 中 用 点 序列 来 表示 时 ,就 实现 
了 离散 限 数 的 可 视 人 化。 当然 ,这 些 图 形 上 的 离散 序列 所 反映 的 只 是 X 
所 限定 的 有 限 点 上 或 有 限 区 间 内 的 晒 数 关系 。 应 当 注 意 的 是 ， 
MATLAB 是 无 法 实现 对 无 限 区 间 上 的 数据 的 可 视 化 的 。 

【 例 3-1】 离散 数据 的 图 形 绘制 。 


Clc,clear 
TX = 1:10-; 


vy = [0.0370 0.0340 0.0270 0.0400 0.0350 0. 0270 0. 0260 0. 0260 
0.0270 0.0250]:; 


plot(x,v, 'ro—— ') 


运行 该 程序 文件 ,得 到 图 形 如 图 3-1 所 示 。 
0.04 
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图 3-1 离散 数据 图 形 绘制 


3.1.2 ”函数 图 形 绘制 


在 MATLAB 中 :是 无 法 男 出 趴 正 的 连续 图 数 的 ,因此 在 实现 连续 图 数 的 可 视 化 时 ， 
数组 在 图 形 中 表示 出 来 。 

当然 :这 些 离 散 的 点 还 是 不 能 表现 曙 数 的 连续 性 的 。 为 了 更 形 旬 地 表现 曙 数 的 规律 
及 其 连续 变化 , 通 第 来 用 以 下 两 种 方法 : 

(1) 对 离散 区 间 进 行 更 细 的 划分 ,逐步 趋 近 羡 数 的 连续 变化 特性 ,下 到 达到 视觉 上 的 

(2) 把 每 两 个 离散 点 用 和 直线 连 挡 , 以 每 两 个 离散 点 之 间 的 直线 来 近似 表示 两 点 则 的 
PR 特性 。 

【 例 3-2】 了 区 数 图 珍 绘制 。 


Clce,clear 

TX 二 1:0.01:10; 
Y= tan(x); 
plot(x, vy, 'r') 


运行 该 程序 文件 ,得 到 图 形 如 图 3-2 所 示 。 
【 例 3-3】〗 对 zy,y 界定 的 区 域 填 充 , 并 对 各 属性 设置 对 应 的 属性 值 。 编 程 如 下 : 


clc,clear,close all 


t= linspace(0,2 x pi, 10); 
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X= SIn( 之 闪 七 ) ; 
= Cos(2 * t); 


area(l(x, y, 'facecolor', 'r') 


图 3-2 函数 图 形 绘制 


运行 程序 ,输出 结 末 如 图 3-3 所 示 。 
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3.1.3 ”图形 绘制 的 基本 步 桑 


通过 上 述 实 例 , 可 以 总 结 出 利用 MATLAB 绘制 图 形 的 一 般 步 台 。 大 致 分 为 如 下 
7 个 步骤 : 

(1) 数据 准备 。 主 要 工作 是 产生 日 变量 采样 向量 ,计算 相应 的 限 数 值 癌 量 ，。 

(2) 选 定 图 形 窗 口 及 了 于 图 位 置 。 默 认 人 情况 下 ,MATLAB 系统 绘制 的 图 形 为 figure. 1、 
figure. 2、…: 依 次 类 推 。 

(3) 调用 绘图 盯 数 绘制 图 形 ,如 plot0 〇 ) 羡 数 。 


(4) 设置 坐标 轴 的 范围 .刻度 及 坐标 网 格 

(5) 利用 对 象 属性 值 设置 或 者 利用 图 形 窗 口 工具 栏 设置 线 型 .标记 类 型 及 其 大 小 等 。 
(6) 添加 图 形 注释 ,如 图 名 .坐标 名 称 、 图 例 、 文 字 说 明 等 。 

(7) 图 形 的 导出 与 打印 。 


3.2 二 维 图 形 绘 制 


绘制 二 维 图 形 常用 的 指令 为 blotC) 。 根 据 不 同 的 坐标 参数 , 它 可 以 在 二 维 平面 上 绘 
制 出 不 同 的 曲线 。MATLAB R2016a 主 窗口 中 的 “绘图 ”功能 区 能 够 利用 工作 空间 的 数 
据 方便 地 夯 出 各 种 类 型 的 图 形 ,不 需要 相应 的 绘图 程序 代码 。 


3.2.1 plot 指令 


将 数 对 排序 的 一 种 方法 是 使 用 plot 指令 。 该 命令 可 以 市 有 不 同 数 目的 参数 。 了 最 简 
单 的 形式 就 是 将 数据 传递 给 plot, 但 是 线条 的 类 型 和 颜色 可 以 通过 使 用 字符 串 来 指定 ， 
这 里 用 str 表示 。 线 条 的 默认 类 型 是 实 线 型 。 

下 面 给 出 plot 指令 的 一 般 使 用 规范 ， 

1) plot 指令 使 用 规范 1: plot(x,y) 

语句 说 明 : 以 工 为 村 坐标 ,y 为 纵 坐 标 , 按 照 坐 标 (xj; ,yj;) 的 有 序 排 列 绘制 曲线 。 

【 例 3-4】 绘制 给 定数 据点 的 增长 率 图 。 编 程 如 下 : 


clce,clear,close all 
load( 'xl1 一 38. mat') 
% 增长 率 
for i=1:38 
x1(1)=1i; 
end 
for i=2:39 
EE TJ i 
end 
fori=1:38 
for J]=1:6 
y111(3, 3) = yi1(i,j)/y1(i,j); 
end 
end 
竺 增长 率 时 间 曲 线 
for i=1:6 
subplot(3,2,1); 
plot(x1, yl111(:,1)); 
end 


运行 程 订 ,输出 图 形 如 图 3-4 所 示 。 
2) plot 指令 使 用 规范 2: plot(y) 
语句 说 明 : y 为 一 维 实 数 数 组 ,以 1:n 为 村 坐标 ,y 为 纵 坐 标 绘 制 曲 线 (n 为 y 的 长 度 )。 
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图 3-4 增长 率 曲 线 图 
【 例 3-5〗] 及 用 plot(O 〇 编程 如 下 : 


clc,clear,close all 

y= [0.0370 0.0340 0.0270 0.0400 0.0350 0.0270 0.0260 0.0260 0.0270 
0.0250]; 

plot(vy', 'rs— ','linewidth',2) 


| 运行 程序 ,输出 图 形 如 图 3-5 所 示 。 
| 0.040 
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' 3.2.2 格 栅 


当 图 像 需 要 对 具体 数值 有 更 加 清楚 的 展示 时 ,在 图 形 中 添加 格 栅 是 十 分 有 效 的 方 
法 。 在 MATLAB 中 ,利用 grid on 指令 可 以 在 当前 图 形 的 单位 标记 处 添加 格 栅 , 利 用 


grid off 指令 则 可 以 取消 格 栅 的 显示 ,单独 使 用 grid 指令 则 可 以 在 on 与 off 状态 下 交 蔡 
转换 , 即 起 到 乔 发 的 作用 。 

【 例 3-6】 面 y 二 x sin(zx) 的 图 形 。 编 程 如 下 : 

clc,clear, close all 


ezplot('x*2* sin(x)',[— 10,101]) 
grid on 


运行 程序 ,输出 图 形 如 图 3-6 所 示 。 


x sin(x) 
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图 3-6 栅 格 化 的 二 维 图 形 绘制 


【 例 3-7】 去 掉 栅 格 。 编 程 如 下 : 


grid off 
ezplot('x*2*x% sin(x)}',[— 10,101]) 


运行 程序 ,输出 图 形 如 图 3-7 所 示 。 


x sin(x) 


图 3-7 去 栅 格 化 的 二 维 图 形 绘制 
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3.2.3 图 形 标记 说 明 


通 负 ,曲线 所 表示 出 的 盯 数 或 数据 的 规律 部 需要 进行 一 些 文字 的 说 明 或 标注 。 现 将 
图 形 窗 口中 的 文本 操作 指令 列 出 如 下 : 
(1) title('text')。 指 令 的 功能 为 在 图 形 窗 口 项 端的 中 间 位 置 输出 学 行囊 'text' 作 为 
(2) xlabel( 'text')。 指 令 的 功能 为 在 工 轴 下 的 中 同位 置 输出 学 行囊 'text' 作 为 标注 。 
(3) ylabel('text')。 指 令 的 功能 为 在 y 轴 边 上 的 中 间 位 置 输 出 学 符 串 'text' 作 为 
标注 。 
《4) zlabel('text')。 指 令 的 功能 为 在 =z 轴 边 上 的 中 间 位 置 答 出 字符 串 'text' 作 为 
标 广 。 
(5) legend(Cstrl,str2,… ,pos)。 指 令 的 功能 为 在 当前 图 上 输出 图 例 , 并 用 说 明 性 字 
行 串 strl ,str2 等 作 标 注 。 其 中 ,参数 pos 的 可 选项 目 如 表 3-1 所 示 。 
表 3-1 曲线 线 型 
将 图 例 框 放 在 坐标 轴 外 的 右 侧 
0 将 图 例 框 放 在 图 窗 内 与 曲线 交 符 最 小 的 位 置 
] 将 图 例 框 放 在 图 窗 内 右上 角 
将 图 例 框 放 在 图 窗 内 左上 角 
将 图 例 框 放 在 图 窗 内 左下 骨 
将 图 例 框 放 在 图 窗 内 右 下 角 


= | | by 


(6) legend(Cstrl,str2,……，'Location' ,pos']) 。 指 令 的 功能 为 在 当前 图 上 输出 图 例 ,并 
用 说 明 性 字符 串 strl str2 等 作 标 注 。 其 中 ,参数 'pos ' 的 可 选项 目 列 表 如 表 3-2 所 示 。 
表 3-2 图 形 标记 


North 图 窗 内 最 上 端 SouthOutside 图 窗外 下 部 
South 图 窗 内 最 下 端 EastOutside 图 窗外 右 侧 


East 图 窗 内 最 右 端 

West 图 窗 内 最 左 端 
图 窗 内 右上 角 ( 二 维 图 窗 的 默认 
项 ) 

NorthW est 加 和 窗 内 左 肯 SouthEastOutside | 图 窗外 右 下 部 


South East 图 窗 内 右 下 角 SouthWestOutside | 图 窗外 左下 部 


WestOutside 各 稀 外 左 便 
NorthEastOutside | 图 窗外 右上 部 


NorthFast NorthWestOutside | 图 窗外 左上 部 


SouthWest 图 窗 内 左下 骨 z 图 窗 内 与 曲线 灵 秋 最 小 的 位 置 
NorthOutside | 图 窗外 上 部 BestOutside 图 窗外 最 不 占 空 间 的 位 置 


(7) legend off。 指 令 的 功能 为 从 当前 图 形 中 清除 图 例 。 
【 例 3-8〗 对 于 图 形 坐 标 轴 以 及 曲面 标记 ,上 有 具体 的 程序 如 下 : 


clc,clear,close all 

A = Iand(10, 10) ; 

surf(A) 

xlabell( 'x') 

ylabel( 'y') 

zlabel( 'z') 

title(' 三 维 曲 面 ') 

legend( :曲面 !，'NorthEast') 


运行 程序 ,输出 图 形 如 图 3-8 所 示 。 


- 维 曲 面 


| 局 曲 面 | 


图 3-8 图形 属 性 标记 
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3.2.4 线 型 .标记 和 颜色 


当 同 一 张 图 形 中 同时 夯 了 多 条 曲线 时 , 则 震 要 使 用 不 同 的 线 型 .标记 或 不 同 的 曲线 
颜色 来 区 分 不 同 的 曲线 。 


MATLAB 平台 中 共有 5 种 不 同 线 型 ,如 表 3-3 所 示 。 
表 3-3 曲线 线 型 


线 型 代号 表示 线 型 表示 线 型 
天 


square 
diamond 
pentagram 
hexagram 


NoOnNe 
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2。 标记 


MATLAB 平台 中 共有 14 种 不 同 标记 方式 ,如 表 3-4 所 示 。 
表 3-4 


3. 顾 色 


MATLAB 平 侣 中 有 代号 的 颜色 共有 8 种 ,如 表 3-5 所 示 。 
曲线 或 标记 颜色 


表 3-5 


颜色 代号 表示 颜色 


8 


mm 品 红色 
b 
C 灰色 


【 例 3-9】 对 于 线 型 .标记 和 颜色 的 程序 书 与 ,程序 如 下 : 


clce,clear,close all 

figure 

X= —20:0.01 x pi:pix 8; 

y = XxX. * (x). * (x)/1000; 

plot(x,y, rT:', ‘LineWidth',3).; 

hold on.; 

plot{lx, vy, ‘KkK—— ,LineWidth',2).; 
plot(x, y+3,'b-— "','LineWidth',1).; 
plot(x, y+ 5, 'rs', LineWidth',3); 
hold on ; 

plot(x,y— 3, 'kp—— LineWidth’', 2); 
plot(x,y— 5, bh 一 一 LIneWIdth' II) ， 
axls tight 


运行 程序 ,输出 图 形 如 图 3-9 所 示 。 


顶点 指向 左边 的 三 角形 
顶点 指向 右边 的 三 角形 
正三 角形 
倒 三 角形 
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图 3-9 ”图形 线 型 .标记 和 颜色 


3.2.5 了 于 图 绘制 


MATLAB 允许 用 户 在 同一 个 图 形 窗 中 同时 绘制 多 幅 相 互 独立 的 子 图 ,这 需要 应 用 
到 subplot 指令 。 其 具体 语句 规范 如 下 : 

(1) subplot(m.n.k)。 在 mxXxn 幅 子 图 中 的 第 kk 幅 图 作为 当前 曲线 的 绘制 图 。 

(2) subplot('position',| left bottom width height |)。 在 指定 位 置 上 生成 子 图 ,并 作 
为 当前 曲线 的 绘制 图 。 

subplot 指令 说 明 : 

(1) subplot(m,n,;k) 指 令 生 成 的 图 形 窗 中 将 会 有 mxXn 幅 子 图 ,k 是 子 图 的 编号 ; 编 
号 的 顺 订 如 下 : 左上 为 第 1 幅 子 图 ,然后 先 癌 右 后 同 下 依次 排 号 ,该 指令 产生 的 子 图 分 割 
与 占 位 完全 按照 默认 值 目 动 进行 。 

(2) subplot(C'position' ,| left bottom width height |) 指 令 所 产生 的 子 图 的 位 置 由 用 
户 指定 ,指定 位 置 的 4 个 元 素 采用 归 一 化 的 标 称 单 位 , 即 认为 图 形 窗 的 宽 、 高 的 取 值 范围 
均 为 [0,1], 左 下 角 的 坐标 为 (0 ,0)。 

《3) 指令 所 产生 的 子 图 ,彼此 之 间 相 互 独立 ,所 有 的 绘图 指令 都 可 以 在 任 一 子 图 中 运 
用 ,而 对 其 他 的 子 图 不 起 作用 。 

《4) 在 使 用 subplot 指令 之 后 ,如 果 上 骨 想 绘制 元 满 整 个 图 形 窗 的 图 时 ,应 当先 使 用 clf 
指令 对 图 形 窗 进行 清空 。 

【 例 3-10】 创建 与 分 割 图 形 窗 口 .编程 如 下 : 


clc,clear,close all 
clf,b=2x pi;x= linspace(0,b,50); 
fork 三 工 :9 
y= sin(k* x); 
subplot(3,3,k),plot(x, vy),axis([0,2x pi,—1,1]) 
end 
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运行 程序 ,输出 图 形 如 图 3-10 所 示 。 


图 3-10 图形 窗口 设置 


3.2.6 拓扑 关系 图 


拓扑 关系 绘图 指令 如 下 : 
gplot(A, xy,1c) 


其 中 ,4 为 一 个 图 G 的 邻接 定 阵 , 即 在 a(i, 站 了 关 0, 则 从 市 点 到 市 友 7 有 一 条 边 , 但 
未必 为 方 阵 ; xy 为 一 个 nX2 的 矩阵 ,表示 各 节点 的 位 置 , 即 xy(i, :) 一 Lx(Cil,y(Ci)j; le 
为 线 型 和 颜色 ,默认 为 “b-”, 其 指明 方式 与 plot 画图 属性 设置 相同 。 

【 例 3-11] 给 制 拓扑 关系 图 。 编 程 如 下 : 


和 拓扑 图 
Clce,clear,close all 
a= [0,1,0,1,0; 
1,0,0,.0,.1; 
0,0,0,0,1; 
1,1,0,0,0; 
0,1,1,0,0;]; 
xy = [1.5 dr7 ds 
| 
gplot(a, xy 工 一 ") 
text{(1i.1,Ss, 11 


本 

4 
text(5.9,3.6, 

2.1 

8 


运行 程序 ,输出 结 末 如 图 3-11 所 示 。 
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图 3-11 拓扑 关系 图 
【 例 3-12】 绘制 足球 网 络 折 扑 图 。 编程 如 下 : 


clc,clear,close all 
[a,v]| = bucky; 

H= sparse(60,60); 
gplot(a— H,v,'r— '); 
hold on 

gplot(H,v, 'bo— ') 


运行 程序 ,输出 结 来 如 图 3-12 所 示 。 


02 04 00 08 1.0 
图 3-12 是 球 网 络 拓 扑 图 


3.2.7 双 坐 标 轴 绘制 


在 实际 的 应 用 中 ,和 和 背 震 要 把 同一 目 变 量 的 两 个 不 同 量 纲 .不 同 量 级 的 上 盟 数 量 的 变 
化 同时 绘制 在 同一 个 图 形 窄 中。 例如 ,在 同一 张 图 中 同时 展示 空间 一 点 上 的 电磁 流 的 幅 
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度 和 相位 随时 间 的 变化 ; 或 者 不 同时 间 内 的 降 南 量 和 温 湿 度 的 变化 ; 或 者 放大 天 的 输 
和 .输出 电流 的 变化 曲线 等 。MATLAB 中 的 Plotyy() 力 数 可 以 对 上 述 功 能 进行 实现 。 
其 具体 的 句法 格式 如 下 : 

(1) plotyy(X1.Y1:,X2:,Y2)。 该 域 句 的 功能 为 以 左右 不 同 的 纵 轴 分 别 绘制 X1-Y1 
和 X2-Y2 两 条 曲线 。 

(2) plotyy(X1,.Y1.X2,Y2.,Fun)。 该 语句 的 功能 为 以 左右 不 同 的 纵 轴 以 Fun 指定 
的 形式 分 别 绘制 XI1-Y1 和 X2-Y2 两 条 曲线 。 

(3) plotyy(X1.Y1.X2,Y2.Funl,Fun2)。 该 语句 的 功能 为 以 左右 不 同 的 纵 轴 分 别 
以 Fun1、Fun2 指定 的 形式 绘制 XI1-Y1 和 X2-Y2 两 条 曲线 。 

使 用 Plotyy 指令 时 需要 注意 的 是 : 左 侧 的 纵 轴 用 来 描述 X1-Y1 曲线 , 右 侧 的 纵 轴 用 
来 描述 X2-Y2 曲线 。 轴 的 范围 与 刻度 值 都 是 自动 生成 的 ,进行 人 工 设置 时 ,使 用 的 绘图 
指令 与 一 般 的 绘图 指令 相同 。 

【 例 3-13 同 坐 标 绘制 不 同 图 形 。 

在 同一 坐标 中 使 用 不 同 坐 标 系 绘制 不 同 的 图 形 。 具 体 编 程 实例 如 下 : 


和 同一 图 形 中 不 同 坐 标 系 绘制 不 同 图 形 
clc,clear,close all 

下 二 一 2 pi:pi/20:2 x pl; 

Y= sin(x); 

z 二 2% abs(cos(x)): 

subplot(211) 

plot(x, y, x, z); 

title( ' 按 相同 坐标 刻度 绘制 不 同 图 形 ') 
subplot(212) 

plotyy(x, vy, XxX,z, 'pPlot', ‘semilogy') 
title( ' 按 不 同 的 坐标 系 进 行 绘制 ') 


运行 程序 ,输出 结 末 如 图 3-13 所 示 。 
按 相同 坐标 刻度 绘制 不 同 图 形 
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图 3-13 同一 坐标 绘图 


3.2.8 二 元 函数 的 人 擅 色 彩 


用 颜色 表示 平面 图 表 中 二 元 曙 数 值 的 大 小 (高 度 ) ,方法 如 下 。 
1. 指定 颜色 集 


(1) pcolor(X:,Y,Z)。 表 示 在 由 X、\Y 构 造 的 平面 上 ,用 2 的 元 系 确 定 相 应 小 格子 的 
(2) pcolor(Z) 。 表 示 在 由 民 的 下 标 值 构造 的 平面 上 :用 2 的 元 率 硝 定 相 应 小 格子 的 


2. 使 用 Shading 命令 控制 着色 模式 


shading flat/interp/faceted 


敌 认 为 faceted, 即 看 色 网 格 并 附加 墨色 网 线 。 
右 为 fat, 则 无 网 线 , 且 各 网 格 颜色 单一 。 在 为 interp, 则 无 网 比 , 且 各 网 格 颜色 通过 
相应 4 个 顶点 的 颜色 值 进 行 双 线性 内 插 得 出 。 


3. 使 用 hold on 使 以 上 设 定 一 直 保 持 
【 例 3-14】〗 二 元 函数 的 伪 色 彩 、 二 元 函数 图 像 的 伪 图 像 实例 。 编 程 如 下 : 


clce,clear,close all 
[x,y,z] = peaks(50); 
peolor(x,y,z); 
shading interp 

hold on 
contour(x,y,z,10, 'k') 
pause 

shading flat 
contour(x,y,z,10,'k') 
Pause 

shading faceted 


contour(x, y, z,10, 'k') 
运行 程序 ,输出 结果 如 图 3-14 一 图 3-16 所 示 。 
3.2.9 MATLAB 特殊 符号 标记 
MATLAB 提供 了 特殊 符号 标记 对 图 形 进 行 修饰 ,对 于 上 下 标的 标定 .工程 上 应 用 


较 广 泛 , 例 如 ,e'sint、x 一 Xe (2) 等 的 标记 ,MATLAB 提供 了 上 下 控制 指令 ,如 表 3-6 
所 示 。 
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表 3-6 上 下 控制 指令 
Nite 
表 3-7 和 希腊 字母 指令 


合法 字符 


何 
任何 合法 字符 


TH | 们 
[站 EETTTTTTTTITITITIIIT TIT TT TT Fe 
rr | 一 一 ， 一 Fe rn | 


interp 彩色 图 
对 于 管见 的 阿拉 伯 宇 母 ,a、B8、6(A) 等 注释 全 号 ,MATLAB 也 提供 了 了 特殊 的 字符 指 
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指 令 主人 
\vartheta . 
\ Nu vCT) 
\xi(\ Xi) PP) 
\pi(\ PD x 
\rho \ psiC Psi) pO) 


\sigma(\ Sigma) \omega(\Omega) af 人) 
还 有 其 他 的 一 些 数 和 学 字符 指令 , 即 数 学 公 却 编辑 着 中 出 现 的 字符 ,MATLAB 提供 了 
相应 的 字符 指令 ,如 表 3-8 所 示 。 
表 3-8 其 他 字符 指令 


i : 


\approx 二 0 \cap \downarrow J 
oe | Sm mn ve i 
\eqguiv | US we 一 
\geq > \oslash Aperp | | ‘subset 个 


\leq 有 otimes < Aprine | », |\ supseteq 


neg 研 必 Ni edot | | 
\pm Npartial | 3 vdos | 2% KE © 


针对 这 些 特殊 字符 的 标记 ,用 户 可 以 将 要 使 用 的 变量 显示 在 图 形 中 ,达到 一 一 对 应 
的 关系 ,因此 实际 应 用 中 广泛 使 用 。 

MATLAB 中 用 于 文字 、 字 符 等 的 标记 好 数 为 text() 。 有 具体 的 使 用 方法 如 下 : 

(1) text(x,y,，'text')。 指 令 的 功能 为 在 图 形 窗 口 的 (x,y) 人 处 写字 和 倒 串 'text'。 坐 标 工 
， 按照 与 所 绘制 图 形 相 同 的 刻度 给 出 。 对 于 辐 量 zx 和 yy ,字符 串 'text' 写 在 (ziyyi) 的 位 

。 如 有 条 'text' 是 一 个 字符 串 回 量 , 即 一 个 字符 和 矩阵 , 且 与 zx,y 有 相同 的 行 数 , 则 第 i 行 
的 peep 口 的 (xz;;,y;) 的 位 置 上 。 

(2) text(x* yy 'text'y'sc')。 折 令 的 功能 为 在 图 形 窗 口 的 (zy) 处 输出 字符 串 'text'"， 
给 定 左 下 角 的 坐标 为 (0.0,0.0), 右 上 角 的 坐标 则 为 (1.0,1.0)。gtext('text') 通 过 使 用 
鼠标 或 方向 键 .移动 图 形 窗口 中 的 十 字 光 标 , 让 用 户 将 字符 串 txt 放置 在 图 形 窗口 中 。 当 
十 字 光 标 走 到 所 期 望 的 位 置 时 ,用 户 按 下 任意 键 或 单 击 鼠标 上 的 任意 按钮 ,字符 串 将 会 
写 人 在 窗口 中 。 

【 例 3-1S]】 特殊 字符 标记 县 体 的 代码 如 下 : 


clc,clear,close all 
loadl( 'xl1 — 38. mat') 
plot(1:39,y1(:,1)) 
hold on 

秆 grid on 
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text(10,13, \approx') 
text({(10,12.5, \exists') 
text(5,13, \approx') 
text(5,12.5, \exists') 


运行 程序 ,得 到 如 图 3-17 所 示 标 记 图 。 
14.5 


14.0 


图 3-17 图形 标记 


【 例 3-16】 在 同一 张 图 上 画 出 >y= 一 sin(i 和 yy 一 3e “”*, 这 里 tE[0,3x], 并 进行 适当 


的 标注 。 编 程 如 下 : 


clc,clear,close all 
clf, x= linspace(0,8 * pi,100):; 
= inline('sin(x+ cos(x+ sin(x)))}'); 
yl = sin(x+ cos(x+ sin(x))):; 
vy2=0.2x% Xx+ sin(x+cos(xt+ sin(x))):; 
plotlx, YL Kk:", x, y2, Kk— ") 
legend( 'sin(Xx + cos(x+ sin(x)}', '0.2x+ sin(x+ cos(x+ sin(x)))})',2) 
h= plot([0:0.1:2x pil]l,sin([0:0.1:2 x pil])); grid on 
set(h, 'LineWidth', 5, 'color', 'red'); set(gca, 'GridLineStyle’','— ', 'fontsize',16) 
秆 设置 yy 坐标 的 刻度 并 加 以 说 明 , 并 改变 字体 的 大 小 
h= plot([0:0.1:2¥% pi],sin([0:0.1:2*% pi])) ;grid on:; 
set(gca, ‘vtick',[—-1 -0.500.5 1]), set(gca, 'yticklabel', ‘alblc|dle'), 
set(gca, 'fontsize', 20) 
和 文字 标注 指令 
plot(x, yl, 'b',x,y2, Kk") ， 
set(gca, 'fontsize', 15, 'fontname', 'times New Roman')， 外 设置 轴 对 铬 的 字体 为 上 imes New Roman 
title(' vitfPeroid and linear peroid functionl ') ; 委 加 标题 
xlabel('x from 0 to 8* pi \it{x}'); vlabel(N\it{vy}'); 车 说 明 坐 标 轴 
text(x(49),vy1(50) -0.4, \fontsize{15} \bullet\leftarrowThe period function {\itf(x)}'); 
名 在 坐标 (x(49),y1(50) - 0.4) 处 作文 字 说 明 ， 各 项 设置 用 "\" 隔 开 
s% \fontsize{15}\bullet\leftarrow 的 意义 依次 是 :\ 字 体 大 小 =15\ 画 圆 点 \ 志 和 芋头 
text(x(14), y2(50) + 1,'\fontsize{15} The linear period function {\itg(x)} \rightarrow\ 
bullet') 


运行 程序 ,输出 图 形 如 图 3-18 所 示 。 
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图 3-18 图 形 标记 
【 例 3-173 填充 和 多边 形 指 令 ,填充 由 点 Czliyy)y， (Crsy yz) …， (zeyy) 构 成 的 允 边 
形 ,其 颜色 由 ec 指明。 十 充 多 边 形 区 域 编程 如 下 : 

千 区 域 颜 色 填 充 
clc,clear,close all 
X= linspace(0,10,50); 
Y= Sin(x). % expl — /5); 
fill(x, vy, 'b') 秆 填充 蓝 色 
text(4,0.01,' 芒 名"') 
运行 程序 ,输出 结 采 如 图 3-19 所 示 。 
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图 3-19 ”多边形 涂 色 


本 下 通过 例子 观察 MATLAB 的 三 维 绘 图 功能 和 技巧 。 
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3.3.1 网 格 图 绘制 


三 维 网 格 图 和 曲面 图 的 绘制 比 三 维 曲线 图 的 绘制 稍 显 复杂 ,主要 是 因为 : 绘图 数据 
的 准备 以 及 三 维 图 形 的 色彩 、 明 暗 、 光 照 和 视角 等 的 处 理 。 绘 制 函 数 = 一 /zy) 的 三 维 
网 格 图 的 过 程 如 下 : 

(1) 确定 上 月 变量 过 和 > 的 取信 范围 和 取 值 间隔 , 即 


X= Xl :dx x ,T= Yl :dvy:yY2 


QD 利用 “ 格 点 ”和 矩阵 的 原理 生成 矩阵 。 


= Xl :Ooc:XZ2 Vdyvy2; 
X= ones(size(vy)) x Xx; 


Y=y* ones(size(x)); 


( 利用 meshgrid 指令 生成 “ 格 点 和 窍 阵 。 


T= Xl :tx x2; T= Tl:uy: vy; 
[X,Y|] = meshgrid(x, vy).; 


\ (3) 计算 在 自 变 量 采 样 “ 格 点 ”上 的 也 数 值 : z 二 f(x,y)。 
z 绘制 网 格 图 的 基本 mesh 指令 的 句法 格式 如 下 : 
/ (1) mesh(Xx,Y,Z) 。 其 功能 为 以 下 为 工 轴 上 月 变量 了 为 y 轴 目 变 量 , 绘 制 网 格 图 ; 
: 淤 .Y 均 为 同 量 , 硅 站 YY 长 度 分 别 为 my 则 Z 为 mXn 的 和 矩 阵 , 即 | m,n 二 size(Z), 则 网 
。 格 线 的 顶点 为 (Xj,Y; ,2D5 ) 。 
(2) mesh(Z)。 其 功能 为 以 Z 矩阵 列 下 标 为 x 轴 日 变量 \ 行 下 标 为 y 轴 日 变量 ,绘制 
网 格 图 。 
(3) mesh(X,Y,Z,C)。 其 功能 为 以 等 为 x+ 轴 自 变量 YY 为 y 和 机 目 变 量 ,绘制 网 格 图 ; 
其 中 C 用 于 和 定义 颜色 ,如 采 不 定义 C:, 则 成 为 meshCX:Y,Z) ,其 绘制 的 网 格 图 的 颜色 随 寿 
乙 信 ( 即 曲面 高 度 ) 成 比例 变化 。 
(4) mesh(X ,YY,Z,'PropertyName' ,PropertywWalue,…)。 其 功能 为 以 天 为 工 轴 目 弯 
量 了 为 轴 目 变量 ,绘制 网 格 图 ; PropertyValue 用 来 定义 网 格 图 的 标记 等 属性 。 
【 例 3-18〗】 绘制 == FCz,y) 一 (1 一 zlnCz 一 y) 的 图 像 , 作 定义 域 的 裁剪 。 
(1) 观察 meshgrid 指令 的 效果 。 编 写 程 序 如 下 : 


clc,clear,close all 

| a= -0.98;b=0.98;c= -1;d= 1;n= 10; 
X= linspace(a,b,n); y= linspace(c,d, n); 

| [X,Y] = meshgrid(x, y); 

| Blot(lX TY. "1 "| 


运行 程序 ,输出 图 形 如 图 3-20 所 示 。 
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图 3-20 ”meshgrid 散 点 周 


(2) 做 函数 的 定义 域 裁剪 ,观察 上 述 三 维 绘图 指令 的 效果 。 编 程 如 下 : : 


clear,clf, 

= ll;b=1l;c= 15;d=15;n= 20;epsl = 0.01; 
XxX= linspace(a,b,n) ;y= linspace(c, d,n):; 

[X,Y¥] = meshgrid(x, y); 


for i=1:n 竺 计算 函数 值 z, 并 作 定 义 域 载 茧 
tor 1] — 1m 
了 上 1— RI JI)< epallXl3.j) 一 了 Js epal 秆 i 语句 这 样 用 
z(i,j) = NaN; 委 作 定义 域 裁 前 ,定义 域 以 外 的 函数 值 为 NaN 
已 Se | 
z(i,j) =1000 x sqrt(1— X(i,j))*— 1. x*1log(X(i,j) —Y(i,j)); 
end 
end 
end 
zz= — 20*x% ones(1,n);plot3(x,x,zz), grid off, hold on 和 沼 画 定义 域 的 边界 线 
mesh(X, Y,z) 竺 给 图 ,读者 可 用 meshz,surf,meshc 在 此 替换 之 
VTIew( [一 56.5 38]1):; 
xlabel(' x+) ylabel('y') zlabel('z') ，box on 对 把 三 维 图 形 封 闭 在 箱 体 里 


运行 程序 ,输出 图 形 如 图 3-21 所 示 。 
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图 3-21 3D 图 
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3.3.2 ”曲线 图 绘制 


在 三 维 图 形 指令 中 ,plot3 指令 十 分 易于 理解 ,其 使 用 格式 也 与 plot 指令 类 似 。 其 具 
体 句 法 形式 如 下 : 

《1) plot3(X,Y,Z)。 语 句 的 功能 为 : X、Y .2Z 为 同 维 向 量 时 ,绘制 以 X 了 .2Q 为 工 .y、 
z 坐标 的 三 维 曲 线 ; XX、Y、Z 为 同 维和 矩阵 时 ,用 关 、Y、Z 的 对 应 列 元 系 绘 制 x、y、z 坐标 的 
三 维 曲 线 ,曲线 的 条 数 为 矩阵 的 列 数 。 

(C2) plot3CX1,Y1,Z1,X2,Y2,Z2)。 语 名 的 功能 为 ; 绘制 以 XX1、Y1,Zl 和 X2、Y2、 
Z2 为 T、y、z 坐标 的 三 维 曲 线 。 

(3) plot3 (X,Y ,ZZ,' PropertyName ' ,PropertyYalue,…:)。 语 人 句 的 功能 为 : 在 
PropertyName 所 规定 的 曲线 属性 下 ,绘制 以 XY 了 .了 为 zy = 坐标 的 三 维 曲 线 。 

《4 ) plot3 CAXAl1, Yl1l, 2Z1, ' PropertyNamel ' , PropertyNamel, X22, Y2, 02,， 
'PropertyNamel',;PropertyNamel)。 请 句 的 功能 为 : 在 PropertyNamel 所 规定 的 曲线 
属性 下 ,给 制 以 Xl1、Y1.Zl 为 XT、y,z 坐标 的 三 维 曲 线 ; 在 PropertyName2 所 规定 的 曲线 
属性 下 ,绘制 以 X2、Y2、Z2 为 Xx、y、z 坐标 的 三 维 曲 线 。 需 要 说 明 的 是 : plot3 指令 用 来 表 
现 的 是 单 参数 的 三 维 曲线 ,而 非 双 参数 的 三 维 曲面 。 

【 例 3-19】 用 平行 截面 法 讨论 由 曲面 z= 二 x 一 2y 构成 的 马鞍 面 形状 。 编 程 如 下 : 


clc,clear,close all 
li- a — 20-.eps0 = 1; 


[x, y¥] = meshgrid( ~ 10:0.2:10); 先生 成 平面 网 格 

v=[—-1010 -1010 -100 100]; 当 设 定 空 间 坐 标 系 的 范围 

当 colormap(gray) 多 将 当前 的 颜色 设置 为 灰色 
zl = (x.*2—2%y.^2) + eps: 先 计 算 马 鞍 面 函数 zl = zl1(x,yYy) 
z2=aAx ones(size(x)):; 第 计算 平面 z2 = z2(x,v) 


r0 = abs(zl 一 z2)<= eps0; 
竺 计算 一 个 和 zl 同 维 的 函数 rr0。 当 abs(zl- z2)<=eps 时 ro =1; 当 abs(zl1 - z2)> eps0 时 ,Ir0 


=0 

和 可 用 mesh(x,y,r0) 语 名 观察 它 的 图 形 , 体 会 它 的 作用 ,该 方法 可 以 套用 

ZzZ= I0. x Zz2;xXx= I0. * Xi;Yyy = I0. *y; 省 计算 规制 的 双 曲 线 及 其 对 应 的 坐标 
subplot(2,2,2), 秆 在 第 2 图 形 窗 口 绘制 双 曲 线 


hl = plot3(xx(r0~— = 0), yy(r0~ = 0),zz(r0~— = 0),'+ '); 

set(hi, 'markersize', 2),hold on, 

axis(v),grid on 

subplot(2,2,1), 和 在 第 1 图形 窗 口 绘制 马鞍 面 和 平面 
mesh(x, yy, zl] ); 


grid, 

hold on ; 

mesh(x, vy, z2 ); 

h2= plot3(xx(r0~— = 0),Yr0— =0),zzlr0~— = 0),"."); 委 画 出 二 者 的 交 线 

set(h2, 'markersize',6),hold on,axis(v), 

Br 委 通 过 循环 绘制 一 系列 的 平面 去 截 割 马鞍 面 
a= 70—1ix30; 刍 在 这 里 改变 截 割 平面 


z2=ax oneslsize(lx)); 
r0=abs(zl — z2)<= 1; 
ZE IO. % ZZ; 

YY 0. %v; 

XxX= I0. EE; 
subplot(2,2,3), 
mesh(x, y,z1); 

grid, hold on; 

mesh(x, yy, z2); 

hidden off 

h2 = plot3(xx(r0~— =0),vy(r0~— = 0),zz(r0~— =0),"'."'); ' 
axis(v), grid 

subplot(2,2,4), 

h4 = plot3(xx(r0~ =0)}),vyy(r0~— = 0),zz(r0~ = 0),'o0'); 
set(h4, 'markersize', 2), 

hold on, 


axis(v), 


会 襄 忆 未 盏 9HVTLVN 和 四 区 


grid on 


end 


运行 程序 :输出 图 形 如 图 3-22 所 示 。 


3.3.3 曲面 医 


| 绘制 


曲面 图 的 绘制 由 surf 指令 完成 ,该 指令 的 调用 格式 与 mesh 指令 类 似 。 有 具体 如 下 : 
《17 surf (X,Y,Z)., 

(2) surft (Z)., 

(3) surf (X,Y,Z,C)., 
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(4) surf( X,Y ,2Z,'PropertyName', PropertyValue,**).。 

与 mesh 指令 不 同 的 是 ,mesh 指令 所 绘制 的 图 形 是 网 格 划 分 的 曲面 图 ,而 surf 指令 
绘制 得 到 的 是 平滑 着色 的 三 维 曲 面 图 ,着色 的 方式 是 在 得 到 相应 的 网 格 点 后 ,对 每 一 个 
了 网 格 依据 该 网 格 所 代表 的 节点 的 色 值 (由 变量 C 控制 ) 来 定义 这 一 网 格 的 颜色 。 

【 例 3-20】 采用 surf 指令 实现 曲面 的 绘制 。 程 序 如 下 : 


clc,clear, close all 

A 二 一 20:1 :20; 

二 一 20:1 :20-: 

[X,Y|] = meshgrid(X,Y):; 
7 te 
surf(X, Y,2Z) 


运行 程序 ,输出 图 形 如 图 3-23 所 示 。 


OA 

2 pe ay, lk ee 举 名 二 党 Is 克 . 昌 富 
AAA % 

py 


图 3-23 ”曲面 绘制 


3.3.4 等 值 线 图 绘制 


等 值 线 图 ,又 叫 作 等 局 线 图 。 绘 制 等 值 线 图 需要 用 到 contour 指令 。 其 调用 格式 
如 下 : 

(1) contour(Z)。 其 功能 为 以 Z 窍 阵列 下 标 为 x 轴 目 变量 、 行 下 标 为 y 轴 上 日 变量 , 绘 

(2) contour(Z,n)。 其 中 ,.n 为 所 绘制 的 图 形 等 值 线 的 条 数 ，。 

(3) contour(Z,v)。 其 中 ,wv 为 向 量 , 向 量 的 长 度 为 等 值 线 的 条 数 ,并 且 等 值 线 的 值 
为 对 应 的 回 量 的 元 紊 值 。 

《4) contour(X,Y,Z)。 其 功能 为 以 站 为 x 轴 上 自 变 量 \Y 为 y 轴 自 变量 ,绘制 等 值 线 
图 ; X.Y 均 为 向 量 , 若 X.Y 长 度 分 别 为 mn, 则 名 为 mXn 的 矩阵 , 即 [m,n] 二 size(2), 则 
网 格 线 的 硕 点 为 (Xj ,Yi, Zs)。 


(5) contour(X:Y:Z:n)。 其 中 ,72 为 所 绘制 的 图 形 等 值 比 的 条 数 。 

(6) contour(X:,Y:,Z:,v)。 其 中 ,um 为 回 量 , 回 量 的 长 度 为 等 值 线 的 条 数 , 并 且 等 值 线 
的 值 为 对 应 的 向 量 的 元 素 值 。 

(7) surf(… ,LineSpec) 。 其 中 ,LineSpec 用 来 定义 等 值 线 的 线 型 。 

【 例 3-21]】 等 高 线 绘制 。 编 程 如 下 : 


CevCLear Close all 

[X,Y,2] = peaks; 

figure(1), 

contour(X,Y, 2Z) 

title( 'peaks 等 高 线 等 值 线 图 1') 
figure( 2), 

contour(X,Y,Z,[35 7 10]1) 
title( 'peaks 等 高 线 等 值 线 图 2') 
figure( 3), 

contour(2) 

title( 'peaks 等 高 线 等 值 线 图 3') 
fiqure(4), 

contour(Zz,10) 


title( 'peaks 等 高 线 等 值 线 图 4') 


运行 程序 ,输出 图 形 如 图 3-24 一 图 3-27 所 示 。 


peaks 等 高 线 等 值 线 图 1 


图 3-24 peaks 等 高 线 等 值 线 图 ] 


3.3.5 特殊 图 形 绘制 


MATLAB 对 于 不 同 的 三 维 曲 面 绘制 ,提供 了 不 同 的 画图 上 申 数 ,如 slice 切片 上 因数 、 
quiver3 三 维 箭头 标记 困 数 .sphere 等 ,因此 MATLAB 丰富 的 图 形 可 视 化 工具 箱 函 数 应 
用 相当 广泛 。 
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peaks 等 高 线 等 值 线 图 2 


图 3-25 “peaks 等 高 线 等 值 线 图 2 


Peaks 等 品 线 手 值 线 图 3 


SS 10 15 20 25 30 35 40 45 
图 3-26 ”peaks 等 高 线 等 值 线 图 3 


peaks 等 高 线 等 值 线 图 4 


图 3-27 peaks 等 高 线 等 值 线 图 4 


【 例 3-22〗 绘制 三 元 函数 忆 二 x 十 y 十 = 的 可 视 化 图 形 。 编 程 如 下 : 


clc,clear,close all 

clf,x= linspacel( — 2,2,40); 

YX 

局 二 23 

[X, Y,Z] = meshgrid(x, y, z); 
Wt 

slice(X,Y,Zwl -10,1],[-1,0,1],[ -1,0,11) 
colorbar 


运行 程序 ,输出 图 珍 如 图 3-28 所 示 。 


图 3-28 切片 图 


【 例 3-23】 空间 曲线 及 其 运动 方 辐 的 表现 。 编 程 如 下 : 


clc,clear,close all 

lf t=0:0.1:1.5-: 

Vx= 2 tt;Vy= 2 t.^2;:Vz=60 x tt.*3—t."2; 

区 二 七 .^2;T= (2/3) xt.*3;z= (66/4) xt.*d— (1/3) x t."*3; 第 由 这 度 得 到 曲线 
plot3(x,v,z, rT. 一 1) ,hold on 特务 飞 行 轨 迹 

竺 算 数值 梯度 ,也 就 是 重新 计算 数值 速度 秋 量 ,这 只 是 为 了 编程 的 方便 ,不 是 必须 的 
Vx = gradient(x) ;Vy = gradient(y);Vz= gradient(z); 
quiver3(x,y,ZzZ, Vx,Vy, Vz), grid on 特务 过 度 笑 量 图 
xlabel( 'x'), ylabel('y'),zlabel( 'z') 


运行 程序 ,输出 图 形 如 图 3-29 所 示 。 
【 例 3-24 用 sphere 指令 绘制 地 球 表 面 的 气温 分 布 。 编 程 如 下 : 


clc,clear,close all 

[a,b,c] = sphere(40): 

t= mx(max(abs(c))) -abs(c); 
surf(a,b,c,t)}):; 

axis( 'equal'), 

colormap( 'hot'), 

shading flat, 

Colorbar 
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图 3-29 ”曲线 指 癌 图 


和 


运行 程序 ,输出 图 形 如 图 3-30 所 示 。 


-0.3 
-1 .0 一 1.0 


图 3-30 ”地 球 表面 气温 分 布 图 


【 例 3-25】 旋转 曲面 的 生成 : 柱 面 指 令 cylinder 和 光照 控制 指令 surfl。 编 程 如 下 : 


clce,clear, close all 
X=0:0.1:10- 

z= XxX;y=1./(x.*3— 2. %x+ 4); 
[u,vw] = cylinder(vy); 
surfl(u,v,w,[45,45]); 
shading interp 


运行 程序 ,输出 图 形 如 图 3-31 所 示 。 


【 例 3-26】 绘制 马鞍 面 = 一 三 -> 的 图 形 。 程 序 调 用 如 下 : 


2 2 


ezmesh( 'x “2/2— yy"*2/2') 


0.7 


—0.4 —0.4 
图 3-31 旋转 曲面 


运行 程序 ,输出 图 形 如 图 3-32 所 示 。 


clc,clear,close all 
X= [1:10|; 
=[56348110356]; 


subplot(2,3,1), 
bar(x, y),axis([1 10 1 11]) 
subplot(2,3,2), 
hist(v,x),axis([1 10 1 4]) 
subplot(2,3,3), 


stem(x, TY 'k'),axis([1 101 11]) 
subplot(2,3,4), 

stairs(x,yY, EK'}, axis([1 101 11]) 
subplot(2,3,5), 


x/2—y /2 
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图 3-32 ”马鞍 面 
【 例 3-27】 特殊 图 形 的 绘制 。 编 程 如 下 : 
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x = [130.55];explode = [000 1];pie(x,explode) 
subplot(2.,3.,6), 

z= 二 0:0.1:100; x= sin(z);y= cos(z}). * 10; 

plot3(x, y, 2) 


运行 程序 ,输出 图 形 如 图 3-33 所 示 。 
Es 
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图 3-33 特殊 图 形 绘 制 


3.4 四 维 图 形 可 视 化 
3.4.1 用 颜色 描述 第 四 维 


在 前 面 章 万 中 介绍 到 ,用 mesh 和 surf 等 指令 所 绘制 的 图 像 ,在 未 给 出 颜色 参量 的 情 
i 况 下 ,图像 的 颜色 是 沿 着 z 轴 的 数据 变化 的 。 例 如 ,surf(X,Y,Z) 与 surf(X,Y,Z,Z) 两 个 
指令 的 执行 效果 是 相同 的 。 将 颜色 施加 于 = 和 轴 能 够 产生 色彩 亮丽 的 图 画 .但 由 于 = 轴 已 
经 存在 ,因此 , 它 并 不 提供 新 的 信息 。 因 此 ,为 更 好 地 利用 颜色 , 则 可 以 考虑 使 用 颜色 来 
描述 不 受 三 个 轴 影 响 的 数据 的 革 些 属性 。 为 此 :和 震 要 赋 给 三 维 作 图 上 因 数 的 颜色 参量 所 需 
要 的 “第 四 维 ” 的 数据 。 

如 果 作 图 消 数 的 闸 色 参量 是 一 个 向 量 或 矩阵 ,那么 京 
量 可 以 是 任何 实 向 量 或 与 其 参量 维 数 相同 的 和 矩阵。 

【 例 3-28】 使 用 颜色 摘 述 第 四 维 示 例 。 

输入 命令 如 下 : 


用 作 颜 色 映 像 的 下 标 。 这 个 参 


[X,Y,2] = peaks(30); 

R = sqrt(X.^2+Y.^2); 
subplot(1,2,1);surf(X,Y,2Z,2); 
axis tight 


subplot(1,2,2);surf(X,Y,Z,R); 
axlis tight 


程序 运行 结果 如 图 3-34 所 示 。 
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图 3-34 使 用 颜色 撒 述 第 四 维 示 倒 


其 中 ,在 坐标 系 中 摘 述 一 个 面 需 要 三 维 数 据 , 而 另 一 维 数据 描述 空间 中 的 点 的 坐标 
值 , 则 使 用 不 同 的 颜色 表现 出 来 。 在 图 3-34(Ca) 中 ,第 四 维 数 据 为 Z; 在 图 3-34(b) 中 ,第 
四 维 数据 为 尺 。 在 图 上 可 以 看 到 两 者 的 颜色 分 布 发 生 了 明显 的 变化 。 


3.4.2 其 他 因数 


除了 surf(0) 盯 数 外 ,meshC) 和 pcolor() 因数 也 可 以 将 第 四 维 的 数据 附加 到 颜色 属性 
上 ,并 在 图 像 中 表现 出 来 。 各 上 曲 数 的 句法 列表 如 表 3-9 所 示 。 
表 3-9 其 他 指令 的 句法 和 功能 
句法 格式 -es 
surfC(X,Y,Z,fun(X,Y, 2)) 根据 肾 数 fun(X,Y,Z) 来 附加 颜色 数据 
surf(X,Y,7) =—=surf(X,Y,Z,Z) 野 认 动作 ,附加 颜色 数据 于 = 轴 
surf(X,Y,Z,X) 附加 颜色 数据 于 z 轴 
surf(X,Y,Z,Y) 附加 颜色 数据 于 > 轴 
SUTTCX YZ 2, "2 | YY,. "2) xoy 平面 上 距 厚 点 一 定 的 距离 附加 颜色 数据 
surf(X, YY ,Zz,del2(2Z)) 根据 曲面 的 拉 氏 函数 值 附加 颜色 数据 
LdZdx,dZdy | 一 gradient(2Z);surf(X,Y,Z,abs(dZdx)) | 根据 zx 轴 方 和 癌 的 曲面 斜率 附加 颜色 数据 
dz= sqgrt(dzZdx. “2 dzZdy.*2);surf(X,Y,Z,dz) 根据 曲面 摆 率 夫 小 附加 颜色 数据 


除了 和 表 3-9 所 列 出 的 函数 之 外 ,slice 因数 也 可 以 通过 颜色 来 表示 存在 于 第 四 维 空间 
中 的 值 。 其 具体 句法 格式 如 下 : 


--- 礼 丹 马 吉 到 8VTLVN 洛 固 溉 
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(1) slice(V,nx,nyy'nz)。 显 示 三 元 图 数 V(X.,Y,Z) 确 定 的 立体 图 在 工 轴 、y 轴 、= 轴 
方向 上 的 看 十 点 (对 应 看 十 平面 ) 的 切片 图 ,各 点 的 坐标 由 数量 回 量 st、sy、sz 指定 ,其 中 
V 为 大 小 为 关 7 区 坊 的 三 维 数 组 ,默认 值 为 茂生 1 :1 了 一 1 :7 一 1 : 户 。 

(2) slice(X,Y,Z,V .nxnys nz)。 硬 示 二 元 好 数 V(X,Y,Z) 确 定 的 立体 图 在 工 轴 ,vy 
机 、z 铀 方 品 上 的 大 十 态 ( 对 应 硅 十 平面 ) 的 切 厂 图 。 夺 靖 数 V(X, Y,Z) 中 有 一 个 变量 六 
取 和 十 值 Xo: 则 因数 VCXoY.Z) 为 X 一 Xo 立 体面 的 切面 图 (将 该 切面 通过 颜色 表示 V 的 
值 ) ,各 点 的 坐标 由 数量 回 量 st、sy、sz 指定。 参量 X 了 Y 了 2 均 为 三 维 数 组 ,用 于 指定 立方 
体 V 的 每 点 的 三 维 坐 标 。 

(3) slice(V ,XI,Y1,Z1)。 显 示 由 参量 算 阵 于 I YT ZIT 确定 的 立体 图 的 切片 图 ,参量 
XIYI、ZI 定义 了 一 个 曲面 ,同时 会 在 曲面 的 点 上 计算 立体 图 V 的 值 。 需 要 注意 的 是 ， 
XIT、YI ZI 必须 为 同型 矩阵 。 

(4) slice(X,Y,Z，V ,XI, YI, ZI 。 钼 着 由 矩阵 XTYT CT 和 定义 的 曲面 穿 过 立体 图 V 
的 切片 图 。 

(5) slice(…，'timethod ')。 通 过 method 来 指定 内 插值 的 方法 ,method 可 取 linear、 
cubic、nearest。linear 指定 的 内 插值 方法 为 三 次 线性 内 插值 ( 硅 末 指定 ,此 即 为 默认 值 )， 
cubic 指定 使 用 三 次 立方 内 插值 法 ,nearest 指定 使 用 最 近 点 内 插值 法 。 


3.5 MATLAB 动画 设计 


MATLAB 动画 由 一 系列 的 帧 图 像 组 成 :MATLAB 图 形 可 视 化 工具 箱 为 动画 化 设 
计 担 供 了 必 备 基础 。 以 下 将 结合 儿 个 动画 例子 来 说 明 。 
【 例 3-29] 绘制 二 维 振动 的 弹 黄 的 动画 。 编 程 如 下 : 


clc,clear,close all 
animinit( 'onecartl] Animation') 
axis([—-26 -10 101); hold on; u= 2; 
xy¥y=[ O0000uuutliutluu; 
L120 2 HL 2 l= 1 201- 
x= xy(1,:);y= xy(2, :); 
多 Draw the floor under the sliding masses 
plot([—10 20],[—1.4 -1.4],'b—','LineWidth',2); 
hndl = plot(x,y, ''b— ','EraseMode', 'XOR', 'LineWidth',2):; 
set(gca, 'UserData', hndl ) ; 
fort=1:0.025:100. 
u= 2+exp(— 0.00*xt) x* cos(t); 
x=[0000uuut+iu+t+t+1iuul]; 
hndl = get(gca, 'UserData' ); 
set(hndl, 'XData', x) ; 
drawnow 
end 


运行 程序 ,输出 图 形 如 图 3-35 所 示 。 


0 .ph | : z 了 /一 5 十 vz) 本 
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实时 变化 动画 显示 。 编 程 如 下 : 


Clce,clear, close all 

x 三 一 名 :0.5 :8 - 

[ XX, YY|] = meshgrid(x); 

r= sqrt(XX.^2+ YY.^2) + eps; 

m= sin(r)./r:; 

surf(2zZ); 

thehxes = axis; 

fmat = moviein(20); 

for J]=1:20; 
surf(sin(2 * pi x* j/20) * Zz,Z) 
axis(theAxes) 
fmat( :,j) = getframe; 

end 


movie(l(fmat,10) 


图 3-35 


一家 


振动 的 弹 答 


hi 
bE 


多 定义 曲面 


委 画 出 帧 

当 保 存 坐 标 值 , 使 得 所 有 帧 都 在 同一 坐标 系 中 
当 创 建 一 个 动画 的 矩阵 ,保存 20 帧 

名 循环 创建 动画 数据 

委 画 出 每 一 步 的 曲面 

竺 使 用 相同 的 坐标 系 

当 复 制 帧 到 短 阵 fmat 中 


运行 程序 ,输出 图 形 如 图 3-36 和 图 3-37 所 示 。 
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图 3-37 动画 视图 2 


【 例 3-31】 地 球 、 月 球 、 巡 娥 一 号 运动 仿 丰 模拟。 编程 如 下 : 


Cle,clear,close all 
figure( 'name', ' 巡 妒 一 号 与 月 亮 .地 球 关 系 ','color',[1 1 11); 当 设置 标题 名 字 
sl= [0:.01:2% pil]; 


hold on;axis equal; 秆 建立 坐标 系 

axis off 各 除 抒 Axes 

rl= 10; 告 月 亮 到 地 球 的 平均 距 高 
r2= 3; 当 娘 娥 一 号 到 月 亮 的 平均 距离 
wl=1; 备 设 置 月 亮 公 转角 速度 

w2 = 12 委 设 置 妨 娥 一 号 绕 月 亮 公 转角 速度 
0 御 初 始 时 齐 为 0 

pausetime = .002; 第 设置 辆 停 时 间 

sital = 0;sita2= 0; 竺 设置 开始 它们 都 在 水 平 线 上 
set(gcf, 'doublebuffer', 'on’') 对 消除 抖动 

plot({ — 20,18, 'color', Iarker' -markersIze' yd40) : 

text( 一 17,18, ' 地 球 '); 第 对 地 球 讲 行 标 识 

pl = plot( — 20,16, 'color', 'b', 'marker','.', 'markersize', 20 ); 
tezxt({( 一 17, 16,， "月亮 ); 争 对 月 亮 进 行 标识 

pl = plot( -20,14, 'color', 'w', 'marker','.', 'markersize', 13) 

text( 一 17,14, ' 娣 娥 一 号 '); 当 对 娘 娥 一 号 进行 标识 
plot(0,0,'color', 'r', 'marker’', '.', 'markersize', 60); 当 了 画 地, 球 
plot(rl x cos(s1),rl1 * sin(s1)); 和 和 表 月 亮 公转 轨道 


set(gca, 区 Lim' [一 20 20], 'ylim',[ — 20 20 11); 

pl = plot(rl # cos(sital) ,rl * sin(sital), 'color', 'b', 'mrker', '.', 'markersize', 30); 
当 画 月 亮 初始 位 置 

11 = plot(rl # cos(sital) + Ir2x% cos(s1),r] x sin(sital) 十 2# sin(s]l)); 
$% 画 娘 娥 一 号 绕 月 亮 公 转轨 道 

p2x = Il x* cos(sital) + r2*x% cos(sita2);p2y= Il] x sin(sital) + r2* sin(sita2).; 


p2 = plot(p2x, p2y, 'w', 'marker', '. ', 'markersize',20); 秆 入 嫌 寻 一 号 的 初始 位 置 
orbit = line( 'xdata', p2x, 'vdata', p2y, ' color', 'r'):; 第 六 始 娥 一 号 的 运动 轨迹 
while 1 

set(pl, 'xdata', rl * cos(sital), 'ydata', Il x* sin(sital )); 竺 设置 月 亮 的 运动 过 程 


set(11, 'xdata', rl x cos(sital) 十 工 2 X cos(s1), 'vdata',rl x sin(sital)} + r2 * sin(sl)); 

% 设置 嫉 娥 一 号 绕 月 亮 的 公转 轨道 的 运动 过 程 
ptempx = rl x Cos(Ssital) 十 I2 x cos(sita2);ptempy = rl1 x sin(sital) + r2 x% sin(sita2); 
set(p2, 'xdata', ptempx, 'ydata', ptempy); 先 设 置 妒 娥 一 号 的 运动 过 程 
p2x = [p2x ptempx];p2Y = [p2Y ptempy]; 
set(orbit, 'xdata', p2x, 'ydata', p2y); 竺 设置 嫦 媳 一 号 运动 轨迹 的 显示 过 程 


- 会 六 己 志 至 8YTIVYN 党 园 梁 


sital = sital + wl *%* pausetime; 向 月 亮相 对 地 球 转 过 的 角度 
sita2 = sita2 + w2 * pausetime; 先 姬 娥 一 号 相对 月 亮 转 过 的 前 度 
pause(l pausetime); 秆 暂停 一 会 
drawnow 

end 


运行 程序 ,输出 图 形 如 图 3-38 和 图 3-39 所 示 。 


图 3-38 ” 地球、 月球 、 巡 娥 一 号 运动 视图 1 图 3-39 地球. 月球 ,嫦娥 一 号 运动 视图 2 
【 例 3-32】 地 球 、 月 球 、 卫 星 运 动 仿 丰 模拟 动 面 制作 。 编 程 如 下 : 


clc,clear,close all 


h= figure( 'numbertitle', 'off', 'name', ' 卫 星 绕 地 球 旋 转 演 示 动 务 '); 秆 设置 标题 名 字 
sl=0:.01:2 *% pi; 

hold on; 

axis equal; 秆 建立 坐标 系 

axis off.; 向 除 抒 AMzes 

ri= 0. 和 地球 到 太阳 的 平均 距离 
re 第 卫星 的 轨道 半径 

员工 三 工 : 竺 设置 地 球 公 转角 过 度 

w2 = 12; 第 设置 卫星 绕 地 球 公 转角 这 度 
EU; 当初 始 时 刻 

pausetime = . 002; 和 设置 视觉 暂 留 时 间 

sital = 0; 

E20 和 设置 开始 它们 都 在 水 平 线 上 
set(gcf, 'doublebuffer', 'on') 委 消除 拌 动 

plot{ 一 20,18, 'color', II marker' -1 'markersize', 40); 

East(— 17 198. "51" 多 对 太阳 进行 标识 

Blot( 一 20,16, 'color', 'b', 'mrker','.', 'markersize', 20) : 

text({ 一 17,16, ' 地 球 '); 委 对 地 球 进 行 标 识 
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plot( 一 20, 14，'Color1 'w', 'mrker','.', 'markersize', 13); 


text( 一 17,14,' 卫 星 '); 先 对 卫星 进行 标识 
plot(0,0, Ieolor' 'r', 'marker', -Imarkersize 60); 革 画 太阳 
plot(rl x cos(s1),r1 * sin(s1)); 向 画 地 球 公 转轨 道 


set(gca, ‘xlim’',|[ — 20 20], ylim’',[ -20 201):; 

pl = plot(rl x cos(sital) ,rl x sin(sital), ‘color', 'b', "mrker', '.', 'markersize', 30); 
地球 初 始 位 置 

11 = plot(rl x cos(sital) + r2x cos(s1),rl1 * sin(sital)} + r2*x sin(s]l)); 
秆 壕 卫星 绕 地 球 的 公转 轨道 

p2x = Il x cos(sital} + r2*x* cos(sita2); 

p2y = Il * sin(sital) 十 I2x sin(sita2); 


p2 = plot(p2x, p2Y, 'w', 'marker', '. ', 'markersize',20); 名 遂 卫 星 的 初始 位 置 
orbit = line( 'xdata', p2x, 'ydata', p2y, 'color', 'r'); 当 画 卫星 的 运动 轨迹 
while 1 
if ~—ishandle(h), 
return, 
end 
set(pl, 'xdata', rl x cos(sital), 'ydata', rl x sin(sital )); 向 设置 地 球 的 运动 过 程 


set(]11, 'xdata', rl x cos(sital) 十 I2 # cos(s1), 'vdata',rl x sin(sital) + r2*x sin(sl)):; 
名 设置 卫星 绕 地 球 的 公转 轨道 的 运动 过 程 
ptempx = rl x cos(sital)} + Ir2 X cos(sita2 ) : 
ptempy = rl x* sin(sital) + Ir2 * sin(sita2 ); 
set(p2, 'xdata', ptempx, 'ydata', ptempy); 和 设置 卫星 的 运动 过 程 
p2x = [p2x ptempx |]; 
Pp2¥ = [p2Y ptempy]; 


set(orbit, 'xdata', p2x, 'vdata', p2y); 秆 设置 卫星 运动 轨迹 的 显示 过 程 
sital = sital + wl * pausetime; 向 地球 相对 太阳 转 过 的 角度 
sita2 = sita2 + w2 x pausetime; 千 卫 星相 对 地 球 转 过 的 角度 
pause(pausetime).; 向 视觉 暂停 

drawnow 竺 刷新 屏幕 , 重 绘 


end 


运行 程序 ,输出 图 形 如 图 3-40 和 图 3-41 所 示 。 
和 太阳 


和 大 时 @ 地 球 
号 地 球 [D 星 
是 星 


图 3-40 ”太阳 .地球 、 卫 星 运 动 视图 ] 图 3-41] 太阳 地球、 卫星 运动 视图 2 
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并 述 其 编程 基本 恩 想 ,根据 函数 本 身 ,通过 MATLAB 代码 编程 和 内 置 函 数 调用 ,实现 相 
tena 代码 编程 和 内 置 了 消 数 调用 ,实现 相 
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随 着 MATLAB 的 商业 化 以 及 软件 本 号 的 不 断 升 级 , MATLAB 
的 用 户 界 面 也 越 来 越 精 致 ,更 加 接近 Windows 的 标准 界面 .人 机 交互 

本 章 基 于 MATLAB R2016a 进行 MATLAB 编程 ,详细 地 阐述 
MATALB 编程 思想 。 

学 习 目 标 : 

。 珊 练 掌握 MATLAB 编程 基本 表示 方法 ; 

。 珊 练 运用 简单 的 MATLAB 编程 语句 解决 运算 求解 ; 

。 珊 练 掌握 MATLAB 编程 对 和 窍 阵 进行 分 析 等 ; 

。 烈 练 学 握 MATLAB 编程 拉 巧 等 。 


4.1 MATLAB 编程 简介 


MATLAB 拥有 强大 的 数据 处 理 能 力 , 能 够 很 好 地 解决 几乎 所 有 
的 工程 问题 。 作 为 一 款 科 学 计算 软件 ,MATLAB 软件 提供 了 人 人 性 化 
的 操作 界面 ,更 加 简易 的 是 MATLAB 软件 提供 了 可 供用 户 任 意 编写 
函数 ,调用 和 修改 脚本 文件 的 功能 ,; 用户 可 以 根据 自己 需要 修改 
MATLAB 工具 箱 函数 等 。 

在 MATLAB R2016a 中 , 单 击 MATLAB 主 界面 的 “新 建 脚本 ” 按 
钮 或 者 单 击 "新 建 ? 按 钮 下 的 “脚本 ”选项 ,如 图 4-1 所 示 。 

在 图 4-1 中 ,用 户 可 以 进行 注释 的 书写 ,字体 默认 为 绿色 ,新 建文 
件 系 统 默认 为 Untitled 文件 ,依次 为 Untitled 1、Untitled 2、Untitled 
3、… :用户 也 可 以 另存 为 ,从 而 修改 文件 名 称 , 例 如 修改 名 称 为 ysw。 
当 用 户 进 行程 序 的 书写 或 者 注释 文字 或 字符 时 ,光标 是 跟着 字符 而 动 
的 ,从 而 使 得 用 户 更 加 轻松 地 定位 书写 程序 所 在 位 置 。 

在 编写 代码 时 ,要 及 时 保存 阶段 性 成 果 , 可 以 通过 File 菜单 中 的 
Save 命令 或 者 保存 工具 按钮 保存 当前 的 M 文件 。 

完成 代码 书写 之 后 ,要 试 运行 代码 ,看 看 有 没有 运行 错误 ,然后 根 
据 针 对 性 的 错误 提示 对 程序 进行 修改 。 

MATLAB 运行 程序 代码 ,如 果 程 序 有 误 ,:MATLAB 像 C 语 言 绵 
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图 4-1 M-File 编辑 


译 器 一 样 , 能 够 报错 ,并 给 出 相应 的 错误 信息 ; 单 击 错误 信息 ,MATLAB 工具 能 够 自动 
定位 到 脚本 文件 (M- 文 件 ), 供 用户 修 改 。 此 外 ,用户 还 可 以 进行 断 点 设置 , 逐 行 或 者 逐 段 
运行 ,查找 相应 的 错误 ,查看 相应 的 运行 结果 ,整体 上 使 得 编程 简易 。 


4.2 MATLAB 编程 原则 
MATLAB 软件 提供 了 一 个 供用 户 自己 书写 代码 的 文本 文件 ,用 户 可 以 通过 文本 文 


件 轻松 地 对 程序 代码 进行 注释 ,对 程序 框架 进行 封装 ,真正 地 给 用 户 提供 一 个 人 机 交互 
的 平台 。MATLAB 具体 的 一 个 编程 程序 脚本 文件 如 图 4-2 所 示 。 


国 沪 后 器 - Untitieda* 


1 有 worjkplace 变 筷 
close all 和 半 掉 显示 图 形 砂 口 
fornat short 
Lrvt1lml 初 简化 担 帮 
F = 0.3: % 等 逆 载 向 KN 
l = 100/1000: 和 杆 长 ma | 
d = 0.7/1000. % 直径 mn | 
其 二 20/1000., % 两 杆 间 距 mm I 
B = 70*10 9; 号 杨 氏 相 重 5Pa 
A = pida 2/4:  % 杆 的 榴 蕉 面积 | 
S1LE 10/1000  % 水 平方 向 位 称 ; 
Ta = pied 4/64 5 转动 惕 国 


图 4-2 编程 流程 
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%( 百 分 写 ) 表 示 注 释 符 号 。 用 户 可 以 在 注释 符号 后 面 写 相 应 的 文字 或 者 字母 ,表示 
该 程序 语句 的 作用 ,使 得 程序 更 加 有 具有 可 读 性 . 

clc 表示 浓 屏 操作 。 程 序 运 行 界 面 常 第 暂 存 运 行 过 的 程序 代 人 码 , 使 得 屏 蒂 不 适合 用 
户 进行 编写 程序 ,用 户 采 用 clc 把 前 面 的 程序 全 部 从 命令 行 Windows 界面 清除 :方便 用 
户 进行 后 续 程 序 书 写 。 

clear 命令 表示 清除 workplace 中 各 类 型 所 有 数据 ,使 得 后 续 程 序 的 运行 变量 之 间 不 
相互 冲突 ,编程 时 应 该 注意 清除 某 些 变 量 的 值 , 以 人 免 造 成 程序 运行 错误 ,此 类 和 错误 在 较 复 
漆 的 程序 中 较 难 查找 ，。 

close all 表示 天 闭 所 有 的 图 形 窗口 ,便于 下 一 程序 运行 时 更 加 直观 地 看 见 图 形 的 显 
示 。close all 能 够 为 用 户 提 供 较 好 的 图 形 显示 界面 ,特别 在 图 像 和 视频 处 理 中 ,close all 
能 够 较 好 地 实现 图 形 参 数 化 设计 ,以 提高 执行 速度 。 

程序 应 该 尽量 显得 清晰 可 见 , 多 设计 可 调用 的 执行 程序 ,达到 编程 的 逻辑 化 操作 , 提 
升 编 程 目的 ,设计 好 程序 后 可 进行 程序 的 运行 调试 。 具 体 程 序 结构 如 下 : 


cle 竺 清 屏 
clear all; 竺 删除 workplace 变量 
close all; 秆 关 挤 显示 图 形 窗 口 


format short 
委 Initial 初始 化 操作 


FE 了 3 币 等 效 载荷 KN 

1 = 100/1000; 竺 村 长 mm 

d = 0.7/1000; 多 直径 mm 

k = 20/1000; 秆 两 杆 间 中 

E = TO 10°*9; 秆 杨 氏 模 量 GPa 
A = pixd*2/4; 当 杆 的 横 截 面积 
S1 = 10/1000 多 水 平方 向 位 移 m 
Ia = pix d“4/64; 多 转动 惯量 


输出 程序 结 采 如 下 : 


= 
0.0100 
Ta = 
1.1786e 一 14 


如 上 述 程序 所 示 ,程序 采用 清晰 化 编程 :用户 可 以 很 清晰 地 知道 每 句 程 序 代 人 码 是 什 
么 意思 ,通过 一 系列 的 求解 ,最终 得 到 相应 的 结果 输出 ,然后 将 所 有 子 程序 合并 在 一 起 来 
执行 全 部 的 操作 。 调 试 过 程 中 特别 注意 错误 提示 ,用 户 可 通过 断 点 设置 . 单 步 执 行 等 操 
作对 程序 进行 修改 ,以 便 程 序 运 行 。 当 然 , 更 复杂 的 程序 还 需要 调用 子 程序 ,或 与 其 他 应 
用 程序 相 结 合 。 


4.3 M 文 件 和 函数 
4.3.1 M 文件 

M 文件 通常 就 是 使 用 的 脚本 文件 ,供用 户 写 程序 代码 的 文件 ,用 户 可 以 进行 代码 相 
关 调 试 ,进而 得 到 优化 的 MATLAB 可 执行 代码 。 

1]. M 文件 的 类 型 


MATLAB 程序 文件 分 为 肾 数 调用 文件 和 主 肾 数 文 件 ,; 主 明 数 文件 通常 可 单独 写成 
简单 的 M 文件 ,执行 run 命令 ,得 到 相 应 的 结果 。 

1) 脚本 M-File 

脚本 文件 通 稼 即 所 谓 的 .m 文件 。 如 图 4-3 所 示 为 一 脚本 文件 。 


三 一 Bb: 1:9.; 
v= ll/ (lx #x); 


% 畏 确 解 曲线 

1] = =6:0,.01:6: 

yi = 1./ (lieij. i): 

plot (xj, yi, linewidth ,2) 

hold on 

% 高 次 多 项 式 插值 

vyh= lagrange (x, y, £1]): 

plot (xi, yh, rr—  。 linewidth ,2) 
Erid on:xlabell' 3 ),ylabell'y ) 
legend(" 原 数 据 曲 蛙 " ." 揪 值 曲 疆 ") 


图 4-3 脚本 文件 


脚本 文件 也 是 主 肯 数 文件 :用 户 可 以 将 脚本 文件 与 为 主 明 数 文件 。 在 脚本 文件 ,用 
户 可 以 进行 主要 程序 的 书写 , 遇 到 需要 调用 上 男 数 来 求解 某 个 问题 时 , 则 需要 调用 该 师 数 
文件 ,输入 该 函数 文件 相应 的 参数 值 , 即 可 得 到 相应 的 结果 。 

2) 明 数 M-File 

图 数 文件 可 供用 户 调 用 的 程序 ,能 够 避免 变量 之 间 的 冲突 ,图 数 文件 一 方面 可 以 节 
约 代码 行 数 , 男 一 方面 也 可 以 通过 调用 函数 文件 使 得 整体 程序 显得 清晰 明了 ， 

图 数 文 件 和 脚本 文件 有 差别 ,因数 文件 通过 输入 变量 得 到 相应 的 输出 变量 : 它 也 是 
为 了 实现 一 个 单独 功能 的 代码 块 ,返回 后 的 变量 显示 在 命令 行 窗 口 或 者 供 主 函数 继续 
使 用 。 
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函数 文件 里 面 的 变量 将 作为 函数 文件 独立 变量 ,不 和 主 函 数 文件 冲突 ,因此 极 大 地 
扩展 了 函数 文件 的 通用 性 。 通 过 封装 代 买 的 函数 文件 , 主 函 数 中 可 以 多 次 调用 ,达到 精 
简 优 化 程序 的 目的 。 


2. M 文件 的 结构 


脚本 文件 和 盟 数 文件 均 属 于 M 文件 ,如 图 4-3 所 示 的 脚本 文件 , 盟 数 名 称 一 般 包 括 
文件 涉 .四 十 .end 结尾 。 文 件 涉 自 先是 清除 变量 以 及 workplace 空间 。 人 代码 如 下 : 


clc 多 清 屏 


clear all; 第 删除 workplace 变量 
close all; 向 关 掉 显示 图 形 窗 口 


对 于 躯体 部 分 , 即 书写 脚本 文件 中 各 变量 的 赋值 :以 及 公式 的 运算 。 代 但 如 下 : 


1 = 100/1000; 千村 共 mm 
d = 0.7/1000; 车 直径 


x= linspace(0,1,200); 
y= linspace( — d/2, d/2, 200); 


对 于 戏 十 部 分 ,一 般 为 程 厅 主要 部 分 ,必要 的 注释 部 分 是 必要 的 ,读者 可 以 清晰 地 看 
出 程序 要 解决 的 问题 以 及 解决 问题 的 思路 。 
end 结尾 常常 用 于 主 函 数 文件 中 ,一 般 的 脚本 文件 不 需要 要 加 ,end 常 和 function 措 


function ysw 


end 


function ysw 


end 


function Ysw 
end 
function ysw 


end 


浮 数 文件 实现 了 代码 的 精简 操作 ,用 户 可 以 多 次 调用 , 阶 旦 代码 行 数 。 在 MATLAB 
编程 中 ,图 数 名 称 也 不 用 刻意 去 声明 ,因此 使 得 整个 程序 可 操作 性 极 大 。 


3. M 文件 的 创建 


脚本 文件 的 创建 较 容易 ,用 户 可 以 直接 在 命令 行 Windows 窗口 进行 代码 书写 。 书 
写 代 码 格 式 如 下 : 


>> Close all 


>> Clear 

>> rand(3) 

ans = 
0.8147 0.9134 0.2785 
0.9058 0.6324 0.5469 
0.1270 0.0975 0.9575 

>> 3 ans 

ans = 
2.4442 2. 7401 0.8355 
2.7174 1.8971 1.6406 
0.3810 0.2926 2.8725 


MATLAB 对 元 素 之 间 的 运算 很 快 , 能 够 快捷 地 实现 和 矩阵 的 基本 运算 。 对 于 男 数 文 
件 的 运算 ,供用 户 进 行 调用 。 书 写 程序 如 下 : 


function Untitled 
Clc 

Clear 

close all 
xX=[1:4| 

mean(x) 


end 


functiony = mean(x, dim) 

if nargin == 1].,， 
多 Determine which dimension SUM will use 
dim = find(size(x)— =1, 1 )， 


if isempty(dim)}), dim = 1; end 


"0 sum(x) /sizel(x, dim); 
[= ls 


y = Sum(x, dim)/size(x, dim); 


运行 程序 , 单 击 匿 在 命令 行 Windows 界面 输出 如 下 : 


zz.5000 


加 党 


一 
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从 主 盟 数 可 看 出 ,该 胃 数 包括 主 明 数 function Untitled 和 调用 哺 数 function y 一 
meanCx:dim) ,该 图 数 主 要 用 于 求解 数组 的 平均 值 , 用 户 可 以 调用 多 次 ,达到 精 人 向 程序 的 
目的 。 当 然 : 对 于 不 同 的 图 数 文 件 , 用 户 根 据 输 和 人 /输出 的 参数 都 可 以 进行 设置 。 


4.3.2 匿名 轩 数 .于 国 数 、 私 有 畏 数 与 私有 目录 


1. 匿名 函数 


匿名 卜 数 没有 上 因数 名 ,也 不 是 因数 M 文件 ,只 包 舍 一 个 表达 式 和 输入 /输出 参数 。 几 
户 可 以 在 命令 行 窗口 中 输入 代码 :创建 匿名 曲 数 。 匿 名 因数 的 创建 方法 为 : 


f = (人 (inputl, input2，… ) expression 


其 中 :三 为 创建 的 因数 句柄 。 卜 数 句 柄 是 一 种 间接 访问 旺 数 的 途径 :可 以 使 用 户 调用 
图 数 过 程 变 得 和 侧 单 ,减少 了 程序 设计 中 的 柳 杂 ,而 且 可 以 在 执行 国 数 调用 过 程 中 保存 相 
关 信 息 。 

例如 , 当 给 定 实 数 zy 的 具体 数值 后 要 求 计算 表达 式 xT? 十 3xy 的 结 朱 ,可 以 通过 创 
建 匿 名 娟 数 的 方式 来 解决 。 

在 命令 行 窗 口中 输入 下 述 命令 : 


Fxy = @(xy) x.* y+ 3xxxy 
MATLAB 将 创建 一 个 名 为 Fxy 的 函数 句柄 ,如 下 : 
Fxy = (D(x YT)x. "YH3x XxY 


调用 whos 图 数 , 可 以 查看 到 变量 Fxy 的 信息 ,如 下 : 


Whos Fxy 
Name Size Bytes Class Attributes 
FxYy lxl 16 function handle 


分 别 求 当 x 二 2、y 二 5 及 += 二 1、y 二 9 时 表达 式 的 值 , 如 下 : 


Fxy(2,5) 

ans = 全 之 
Fxy(1,9) 

Tn 之 日 


2. 子 函 数 
在 MATLAB 中 ,多 个 函数 的 代码 可 以 同时 写 到 一 个 M 函数 文件 中 。 其 中 ,出 现 的 


第 一 个 函数 称 为 主 函 数 (primary function), 该 文件 中 的 其 他 函数 称 为 子 函 数 (sub 
function)。 保 存 时 所 用 的 函数 文件 名 应 当 与 主 阴 数 定义 名 相同 ,外 部 程序 只 能 对 主 函 数 


进行 调用 。 

了 于 晒 数 的 书写 规范 有 如 下 几 条 : 

(1) 每 个 了 于 因数 的 第 一 行 是 其 因数 声明 行 。 

(2) 在 M 顶 数 文件 中 , 主 晒 数 的 位 置 不 能 改变 ,但 是 多 个 子 图 数 的 排列 顺序 可 以 任 

(3) 子 函 数 只 能 被 处 于 同一 M 文件 中 的 主 明 数 或 其 他 子 果 数 调 用 。 

(4) 在 M 函数 文件 中 ,任何 指令 通过 “名 称 ” 对 哨 数 进行 调用 时 ,子孙 数 的 优先 级 仪 
次 于 MATLAB 内 置 聘 数 ，。 

(5) 同一 M 文件 的 主 也 数 、 子 函数 的 工作 区 都 是 彼此 独立 的 。 各 个 归 数 间 的 信息 传 
递 可 以 通过 输入 /输出 变量 .全 局 变量 或 跨 空 间 指 令 来 实现 。 

《6) help lookfor 等 帮助 指令 都 不 能 显示 一 个 M 文件 中 的 子 困 数 的 任何 相关 信息 。 

【 例 4-1】 M 文件 中 的 子 图 数 示 例 。 

创建 M 文件 并 命名 为 ex4_1. ms。 

利用 M 文件 编辑 器 ,在 ex4_1.m 文件 中 写 人 : 


functionF = exd 1(n) 

nL 1 mo 2 phi pil2; 

signal = createsig(A,w,phi):; 

F = signal.^n; 

A subfunction 一 一 一 一 一 一 一 一 一 
function signal = createsig(A,w, phi) 
x = 0: pi/1i00 : pix 2:; 

signal = A * sin(w* XxX+ phi); 


3. 私有 函数 与 私有 目录 


所 请 私有 肾 数 ,是 指 位 于 私有 目录 private 下 的 M 力 数 文件 。 它 的 主要 性 质 有 如 下 
几 条 : 

(1) 私有 因数 的 构造 与 普通 M 明 数 完全 相同 。 

(2) 关于 私有 晴 数 的 调用 : 私有 上 曲 数 只 能 被 private 再 接 父 目录 下 的 M 文件 所 调用 ， 
而 不 能 被 其 他 目录 下 的 任何 M 文件 或 MATLAB 指令 窗 中 的 命令 所 调用 。 

(3) 在 M 文件 中 ,任何 指令 通过 ~ 名称 "对 曲 数 进行 调用 时 ,私有 上 曲 数 的 优 扼 级 仅 次 
于 MATLAB 内 置 果 数 和 了 于 图 数 。 

(4) help lookfor 等 玫 助 指令 午 不 能 显示 一 个 私有 上 图 数 文件 的 任何 相关 信息 。 


4.3.3 重 载 国 数 


重 载 是 计算 机 编程 中 非常 重要 的 概念 ,经 常用 于 处 理 功能 类 似 但 变量 属性 不 同 的 函 
数 。 例 如 ,实现 两 个 相同 的 计算 功能 ,输入 的 变量 数量 相同 ,不 同 的 是 其 中 一 个 输入 变量 
类 型 为 双 精 度 浮 点 类 型 , 另 一 个 输入 变量 类 再 为 整 型 ,这 时 ,用 户 就 可 以 编写 两 个 同名 范 
数 , 分 别处 理 这 两 种 不 同情 况 。 当 用 户 实际 调用 函数 时 ,MATLAB 就 会 根据 实际 传递 的 
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MATLAB 的 内 置 时 数 中 就 有 许多 重 载 曙 数 ,放置 在 不 同 的 文件 路 径 下 ;文件 夹 通 和 瘦 
命名 为 “@ 十 代表 MATLAB 数据 类 型 的 学 行 "。 例 如 ,@int16 路 径 下 的 重 载 阴 数 的 输入 
变量 应 为 16 位 整 型 变量 ;而 (@ double 路 径 下 的 重 载 曙 数 的 输入 变量 应 为 双 精 度 浮 点 


4. 3.4 eval 利 | feval | 


1. eval 函数 


eval 了 滑 数 可 以 与 文本 变量 一 起 使 用 ,实现 有 力 的 文本 宏 工 具 。 其 具体 句法 形式 
如 下 。 

eval(s) : 该 指令 的 功能 为 使 用 MATLAB 的 注释 需求 表达 式 的 值 或 执行 包含 文本 字 
符 串 s 的 语句 。 

【 例 4-2〗 eval 函数 的 简单 运用 示例 。 

本 例 共 展示 了 利用 eval 图 数 分 别 计算 4 种 不 同类 型 的 语句 字符 串 , 即 “表达 式 ” 字 符 
串 “ 指 令 语 名 ?字符 串 “ 备 选 指令 声名 ?字符 串 和 "组 合 ” 字 符 串 。 

现 示 例如 下 。 

(1) 创建 M 文件 并 命名 为 eval_expl. mm。 

利用 M 文件 编辑 髓 ,在 eval_expl. m 文件 中 写 入 : 


rr 
String = '[Array * 2; Array/2; 2.^Nrrav]'; 
Output = eval(String) 


输出 结 示 如 下 : 


Qutput = 
2.0000 4.0000 6.0000 8.0000 10.0000 
0.5000 1.0000 1.5000 2.0000 2.5000 
2.0000 4.0000 8.0000 16.0000 32.0000 


(2) 创建 M 文件 并 命名 为 eval exp2. m。 
利用 M 文件 编辑 需 ,在 eval_exp2. m 文件 中 写 人: 
theta = pi; 


eval('Output = exp(sin(theta))'); 


who 


运行 M 文件 , 结 采 如 下 : 


Your variables are: 
Array Output String YY t theta 


(3) 创建 M 文件 并 命名 为 eval_exp3. m。 
利用 M 文件 编辑 着 ,在 eval_exp3. m 文件 中 写 入 : 


Matrix = magic(3) 
Array = eval('Matrix(5, :)}', 'Matrix(3,:)') 
errmessage = lasterr 


运行 M 文件 , 结 采 如 下 : 


导 9 2 
eIIMeESSAGe = 


Index exceeds matrix dimensions. 


C4) 创建 M 文件 并 命名 为 eval exp4. m。 
利用 M 文件 编辑 大 ,在 eval_exp4. m 文件 中 写 人: 


Expression = {'zeros', ones' 'rand', 'magic'}; 
Num = 2; 
Qutput = [|]; 
for i= 1:1length(Expression) 
Output = [Output eval([Espression{i},'(',num2str(Num),')']}]:; 
end 
Qutput 


运行 M 文件 , 结 采 如 下 : 


(mtput = 0 0 1.0000 1 .0000 0.0318 0.0462 1] .0000 3.0000 
U 0 1.0000 1.0000 0.217169 DD.09371 4.0000 .0000 


2. feval 函数 


feval 了 滑 数 的 具体 句法 形式 如 下 : 
[yl, vy2, :…|] = feval('FN', argl, arg2, …) 


该 指令 的 功能 为 用 变量 argl,arg2,… 来 执行 FN 本 数 指定 的 计算 。 

说 明 : 

(1) 在 此 FN 为 晒 数 名 。 

(2) 在 eval 图 数 与 feval 旧 数 通用 的 情况 下 (使 用 这 两 个 图 数 均 可 以 解决 问题 )， 
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feval 辆 数 的 运行 效 鞭 比 eval 图 数 高 。 
(3) feval 了 滑 数 主要 用 来 构造 “ 沁 了 区 型 M 了 黄 数 文件 。 
【 例 4-3】 feval 昂 数 的 简单 运用 示例 。 
(1) 示例 说 明 : feval 和 eval 职 数 运行 区 别 之 一 是 feval 盯 数 的 FN 不 可 以 是 表达 陈 。 
创建 M 文件 并 命名 为 feval expl. m。 
利用 M 文件 编辑 硕 ,在 feval_expl. m 文件 中 写 入 : 


Ariav 1:5 
String = '[Array * 2; Array/2; 2.°Array]'; 


Outpute = eval(String) 秆 使 用 eval 函数 运行 表达 式 
OutputE = feval(String) 竺 使 用 feval 函数 运行 表达 趟 


运行 M 文件 , 结 采 如 下 : 


Qutpute = 
2.0000 4.0000 6.0000 8.0000 10.0000 
0.5000 1.0000 1.5000 2.0000 2.5000 
2.0000 4.0000 8.0000 16.0000 32.0000 


Invalid function name '[Array * 2; Arravy/2; 2.*Array]' 


(2) 示例 说 明 : feval 了 负数 中 的 FN 只 接受 好 数 名 ,不 能 接受 表达 式 ，。 
创建 M 文件 并 命名 为 feval exp2. mn 。 
利用 M 文件 编辑 瘟 ,在 feval_exp2. m 文件 中 写 入 : 


j= sqrt(— 1); 

Z = exp(j*(— pi:pi/100:pi)); 

eval('plot(Z)'):; 

set(gcf, units', normalized', 'position',[0.2,0.3,0.2,0.2]) 
title('Results by eval') ;axis( 'square') 

figure 

set(gcf, units’', normalized', 'position’',[0.2,0.3,0.2,0.2]) 
feval( plot', 2Z):; 

title(l 'Results by feval') ;axis( 'square') 


运行 M 文件 , 结 采 如 图 4-4 所 示 。 


Results by feval 


一 ] 0 | 
图 4-4 ”feval_exp2. m 文件 的 运行 结果 


4.3.5 内 联 明 数 


由 联盟 数 Cinline function) 的 属性 和 编写 方 陈 与 普通 因数 文件 相同 ,但 相对 来 说 ,内 
联盟 数 的 创建 简单 得 多 。 其 具体 句法 形式 如 下 。 

(1) inline('CE'): 其 功能 为 把 学 和 从 串 表 达 式 CE 转化 为 输入 变量 日 动 生成 的 内 联 限 
数 。 本 语句 将 日 动 对 字符 串 CE 进行 辨识 ,其 中 除了 “预定 义 变 量 名 ”( 如 圆周 率 pi)、“ 策 
用 也 数 名 (如 sin rand 等 ), 其 他 由 字母 和 数字 组 成 的 连续 学 和 全 辨识 为 受 量 ,连续 学 生 后 
紧 接 左 插 号 的 ,也 不 会 被 识别 为 变量 ,如 array(1) 。 

(2) inline('CE',argl ,arg2,…): 其 功能 为 把 字符 早 表 达 式 CE 转换 为 argl ,arg2 等 
指定 的 输入 变量 的 内 联 肾 数 。 本 语句 创建 的 内 联 肾 数 最 为 可 徘 , 输 入 变量 的 字符 串 用 户 
可 以 随意 改变 .但 是 由 于 输入 变量 已 经 规定 :因此 生成 的 内 联盟 数 不 会 出 现状 识 失 误 等 
错误 。 


(3) inline('CE',n): 其 功能 为 把 字符 串 表达 式 CE 转化 为 个 指定 的 输入 变量 的 内 


联 时 数 。 本 语句 对 输入 变量 的 学 人行 是 有 限制 的 ,其 字 行 只 能 是 ,Pi,…,P, 等 ,其 中 PP 


一 是 为 大 与 字母 。 

说 明 : 

(1) 字符 电 CE 中 不 能 包含 赋值 符号 “一 ”。 

(2) 内 联 函 数 是 沟通 eval 和 feval 两 个 函数 的 桥梁 ,只 要 是 eval 可 以 操作 的 表达 式 ， 
部 可 以 通过 inline 指令 转化 为 内 联 上 图 数 ,这 样 , 内 联 图 数 总 是 可 以 被 feval 调用 。 
MATLAB 中 的 许多 内 置 函 数 就 是 通过 被 转换 为 内 联 函 数 ,从 而 具备 了 根据 被 处 理 的 方 
式 不 同 而 变换 不 同盟 数 形 式 的 能 力 。 

MATLAB 中 关于 内 联 晒 数 的 属性 的 相关 指令 如 表 4-1 所 示 , 读 者 可 以 根据 需要 
使 用 。 

表 4-1 内 联 函 数 属 性 指令 集 


指令 和 旬 法 功 能 
class(inline fun) 提供 内 联 图 数 的 类 型 
charCinline fun) 提供 内 联 明 数 的 计算 公式 
argnames(inline_fun) 提供 内 联 函 数 的 输入 变量 
vectorizeCinline fun) 使 内 联 明 数 适用 于 数组 运算 的 规则 


【 例 4-4 内 联 明 数 的 和 伽 单 运 用 示例 ， 
(1) 示例 说 明 : 内 联盟 数 的 第 一 种 创建 格式 是 使 内 联 晒 数 适 用 于 “数组 运算 ”。 
在 命令 行 窗 口 输入 : 


Funl = inline('mod(12,5)') 
输出 结果 如 下 : 


Funl = 内 联 函 数 : Funl(x) = mod(12,5) 
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在 命令 行 窗 口 输入 : 


Fun2 = VectorlIzelEuanl) 


输出 结 示 如 下 : 


Fun2 = 内 联 画 数 : Fun2(x) = mod(12,5) 


在 命令 行 窗 口 输入 : 


Fun3 = char (Fun2) 


输出 结果 如 下 : 
Fun3 = mod(12,5) 
(2) 示例 说 明 : 第 一 种 内 联 肾 数 创建 格式 的 缺陷 在 于 不 能 使 用 多 标量 构成 的 巾 量 进 


行 赋值 :而 使 用 第 二 种 内 联盟 数 创 建 格式 则 可 以 -。 
在 命令 行 窗 口 输入 : 


Fun4 = inline('m*x exp(n(1)) * cos(n(2))'), Fun4(1,[ -1,pi/2]) 


输出 结 采 如 下 : 
Fun4 = 


内 联 函 数 : 
Fund(m) = mx exp(n(1))* cos(n(2)) 


错误 使 用 inline/subsref (line 14) 
内 联防 数 的 输入 数目 太 多 


在 命令 行 窗 口 输入 : 


Fun5 = inline('m*x exp(n(1)) x cos(n(2)) ,m,n'), Fun5(1,[ — 1,pi/2]) 


输出 结 采 如 下 : 


Fun5 = 
内 联 函 数 : 
Fun5(m,n) = mx exp(n(1)) xcos(n(21)) 
ans = 
2.2526e— 017 


(3) 示例 说 明 : 产生 回 量 输入 、 回 量 输 出 的 内 联 晒 数 。 
在 命令 行 窗 口 输入 : 


vy = inline('[3* x(1) x x(2)”3;sin(x(2))]"') 


输出 结 来 如 下 : 


些 gVTLYW 荐 四 司 


各 
v(x) = [3 x(1) x x(2)*3; sin(x(2))] l 


在 命令 行 窗口 输入 : 


Y = inline('[3*% x(1) x* x(2)*3;sin(x(2))]') 


输出 结 采 如 下 : 


Y(x) = [3*x% x(1) x x(2)*3;sin(x(2))| 


在 命令 行 窗 口 输入 : 


argnames(Y) 


输出 结 采 如 下 
amS = 由 韦 


x=[10,pix 5/6];y= Y(x) 


TY = 一 
538. 3034 
0.5000 


(4) 示例 说 明 : 最 简练 的 格式 创建 内 联 电 数 ; 内 联 晒 数 可 被 feval 指令 调用 。 
在 命令 行 窗口 输入 : 


2Z= inline( 'floor(x) * sin(Pl) * exp(P2 *2)',2) 
输出 结果 如 下 : 
Z = 内 联 函 数 : Z(x, P1,P2) = floor(x) x sin(P1) x exp(P2 ^2) 


在 命令 行 窗 口 输入 : 
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z = ZT(2.3,pi/8,1.2), fz = fevallZ,2.3,pi/8,1.2) 


输出 结 采 如 下 : 


-于 3.2304 
fz = 3.2304 


要 想 让 MATLAB 最 高 速 地 工作 ,重要 的 是 在 M 文件 中 把 算法 器 量 化 。 其 他 程序 语 
言 可 能 用 for 或 do 循环 :MATLAB 则 可 用 向 量 或 矩阵 运算 。 下 面 的 代码 用 于 创立 一 个 


XxX 三 0.01.; 
fork = 1:1001 
y(k) = log10(x); 
区 一 瑟 十 0.01.- 
end 


同样 代码 的 向 量化 


xX 三 属 .O01 :0.01:10; 
Y = logl0(x); 


对 于 更 复杂 的 代码 ,矩阵 化 选项 不 总 是 那么 明显 。 当 速度 重要 时 ,应 该 想 办 法 把 算 
法 向 量化 。 


2. 预 分 配 


若 一 条 代码 不 能 向 量化 , 则 可 以 通过 预 分 配 任何 输出 结果 已 保存 其 中 的 向 量 或 数组 
以 加 快 for 循环 。 例 如 ,下 面 的 代码 用 zeros 函数 把 for 循环 产生 的 向 量 预 分 配 , 这 使 得 
for 循环 的 执行 速度 显著 加 快 。 


工 三 zeros(32,1); 
forn = 1 :32 

r(n) = rank(magic(n)); 
end 


上 例 中 奎 没有 使 用 预 分 配 , MATLAB 的 注释 硕 利用 每 次 循环 扩大 回 量 。 回 量 预 
分 配 排除 了 该 步 又 以 使 执行 加 快 。 

一 种 以 标量 为 变量 的 非 线 性 肯 数 称 为 “ 果 数 的 盟 数 : 即 以 盟 数 名 为 目 变 量 的 盯 数 。 
这 类 畏 数 包括 求 和 零点、 最 优化 、 求 积分 和 第 微分 方程 等 。 


MATLAB 通过 M 文件 的 男 数 表示 该 非 线性 晒 数 。 


例如 ,下 例 为 一 个 和 商 化 的 humps 图 数 (humps 图 效 可 在 路 和 MATLAB\demos 下 
获得 ) 。 


【 例 4-5] 卜 数 的 图 效 人 向 单 运 用 示例 。 
创建 M 文件 ,利用 M 文件 编辑 本 ,在 M 文件 中 写 入 : 


a 二 0:0.002:1; 
b = humps(a); 
plot(a, b) 名 作出 图 像 


function b = humps 


b = 1./((x-.3).*2+ .01) + 1./((x- .9).^2 + .04) - 6; 名 在 区 间 [0,1] 求 此 元 数 的 值 


运行 文件 ,输出 图 像 如 图 4-5 所 示 。 
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图 4-5 humpsl. m 运行 结果 


图 像 表 明 上 因数 在 + 二 0.6 附近 有 局 部 最 小 值 。 接 下 来 用 图 数 fminsearch 可 以 求 出 局 


部 最 小 值 及 此 时 z 的 但。 哺 数 fminsearch 第 一 个 参数 是 图 数 句柄 ,第 二 个 参数 是 此 时 工 
的 近似 值 。 


p = fminsearch( (®@humps,.s5) 


输出 结果 如 下 : 


0.6370 


在 命令 行 窗口 输入 : 


humps(p) 秆 求 出 此 局 部 最 小 值 
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输出 结 采 如 下 : 


ans 一 
11. 2528 


4.4 MATLAB 程序 控制 语句 运用 


与 一 般 的 C、C++ 和 等 语言 相似 ,具有 相应 的 很 多 归 数 程序 编写 句 顶 ;用户 可 以 轻松 地 
采用 这 些 判 别 语句 进行 程序 书写 ;具体 的 判别 语句 : 程序 分 文兵 制 语 名 (结构 和 switch 
结构 ) ,程序 循环 控制 二 名 (for 御 环 while 循环 .continue 境 句 和 break 语句 ) 和 程序 终止 
控制 语句 (return 语句)。 下 面 分 别 进行 介绍 。 


1. 程序 分 支 控制 语句 


程序 分 支 控 制 语句 包括 if 结构 和 switch 结构 语句 。if 与 else 或 elseif 连用 , 偏 问 于 
是 非 选择 , 当 某 个 逻辑 条 件 满足 时 执行 让 后 的 语句 ,和 否则 执行 else 语句 。switch 和 case、 
otherwise 连用 ,偏向 于 各 种 情况 的 列举 , 当 表 达 式 结果 为 某 个 或 某 些 值 时 ,执行 特定 case 
指定 的 语句 段 ,和 否则 执行 otherwise 语句 。 其 中 ,让 语句 在 实际 编程 中 运用 较 多 ,具体 的 让 
语句 句法 形式 如 下 : 


le 

Clear, 

close all 

a=1l1; 

if a==1 
b=0 


end 


运行 程序 :输出 结 采 如 下 : 


区 = 


如 果 a 二 2 ,继续 运行 程序 , 即 


Clear, 

a= 2. 

if a==1 
b=0 

end 


则 命令 行 Windows 界面 没有 任何 输出 。 从 上 面 的 两 个 案例 可 看 出 ,if 用 于 判别 该 等 
式 或 者 不 等 式 是 否 成 立 ,车 成 立 , 则 输出 响应 的 结果 ; 若 不 成 立 , 则 不 作 判 别 程序 内 部 的 
执行 操作 ，。 


if 与 else 搭配 编程 如 下 : 


ce 
Clear, 
close all 
已 二 之; 


程序 中 a 二 2,if 语句 判别 不 成 立 
因此 if 和 else 结构 适合 全 集结 
switch 语句 则 采用 枚 举 法 进行 变量 的 判定 ,执行 每 一 


i 构 判 别 , 韭 0 即 了 1 的 判别 方式 , 较 多 地 应 用 在 工程 各 领域 。 
个 case 时 ,有 相关 的 独立 的 变 


量 处 理 形式 ,; 枚 举 的 个 数 可 以 很 多 个 ,当然 也 有 对 应 的 otherwise 判别 语句 提供 用 户 进 行 
判别 其 补 集 下 的 执行 功能 。 
具体 的 switch 语句 书写 如 下 : 


Le 
Clear, 
close all 
a= [1]; 
switch a 
case a(l1) == 1 
b=0 
case a(2) == 2 
b=1 
otherwise 
b=2 
end 


运行 程序 ;输出 
by 三 
0 


改变 a 的 取 值 , 令 


= 


sWitch a 


结果 如 下 : 


a 二 2 时 ,同样 执行 该 语句 有 : 
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b= 
otherwise 
b=2 
end 


运行 程序 ,输出 结果 如 下 : 


当 ea 一 3 时 ,程序 如 下 : 


CAaASe a ==2 
b=1 

otherwise 
b=2 


end 


运行 程序 ,输出 结果 如 下 : 


I 


从 上 面 的 运行 结果 可 知 ,switch 语句 对 变量 的 值 进行 判别 ,判别 等 式 成 立 则 输出 相 
应 的 结果 ,otherwise 是 在 所 有 的 case 不 成 立 下 的 一 种 输出 ,有 时 编程 只 需要 case 的 情 
沈 ,有 时 则 震 要 履 盖 整个 时 域 , 因 此 switch 与 case 和 otherwise 搭配 视 具体 情况 而 定 。 

从 以 上 判别 请 句 可 知 ,switch-case 语句 实际 上 可 以 被 二 elseifelse 语 名 等 效 符 换 ,在 
编程 中 if 语句 使 用 更 为 广泛 ,switch 语句 对 于 类 别 的 分 类 比较 使 用 较 多 ,MATLAB 中 的 
switch-case 结构 ,只 执行 表达 式 结 果 匹 配 的 第 一 个 case 分 文 , 然 后 就 跳出 switch-case 结 
构 。 有 具体 的 使 用 方法 在 后 续 读 者 将 会 更 加 直观 地 感受 到 其 应 用 。 


2. 程序 循环 控制 语句 


循环 控制 语句 能 够 处 理 大 规模 的 数据 ,能 够 循环 进行 数据 处 理 , 特 别 是 矩阵 的 运算 ， 
一 个 矩阵 包括 M 行 N 列 , 通 常 需要 对 M 行 N 列 均 进 行 处 理 ,因此 循环 语句 显得 尤为 重 
要 。MATLAB 中 提供 了 两 类 循环 语句 ,分 别 是 for 循环 和 while 循环 : 

(1) for 循环 指定 了 循环 的 次 数 ,如 M 行 数据 处 理 , 则 循环 M 次 . 

(2) while 循环 则 判别 等 式 是 否 成 立 , 若 成 立 , 则 继续 在 循环 体 中 运行 ; 若 不 成 立 , 则 
跳出 循环 体 ,如 果 设 置 参 数 不 合 理 , 则 可 能 导致 死 循 环 ,因此 在 使 用 while 时 ,应 该 注意 判 


别 语句 的 使 用 。 
与 for 和 while 搭配 的 循环 的 语句 有 end,\break.,、continue 等 ,end 表示 循环 结束 ， 
break 表示 内 骸 判 别 语 句 下 的 结束 循环 ,continue 语句 使 得 当前 次 循环 不 辐 下 执行 ,直接 
1) for 循环 
for 循环 直接 指定 循环 的 次 数 。 具 体 的 语法 格式 如 下 : 
ce 


clear, 


Close ll 


b=0 
for i=1:3 
b=b+i+1 
end 
运行 程序 ,输出 结果 如 下 : 
Ia 
0 
I 三 
1 
= 
2 
b = 
3 


执行 完 程 序 可 直观 地 知道 循环 操作 下 的 2 变化 的 值 , 每 经 过 一 次 循环 ,2 的 值 就 加 1， 
逐步 地 显示 在 命令 行 Windows 窗口 ,for 循环 体 结 束 以 end 结束 ,如 有 果 内 部 通 人 让 等 判 
别 语句 ,可 采用 break 等 语句 结束 循环 。 有 具体 如 下 : 


for i=1:3 
if b== 2 
break; 
end 
b=b+i+1 
end 


b = 
0 

b = 
1 

b = 
2 


在 循环 体 中 .5 如 果 等 于 2, 则 退出 循环 体 , 输 出 结果 正好 吻合 循环 体 对 应 的 输出 , 同 
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样 对 于 continue; 也 是 如 此 。 上 有 具体 如 下 : 


运行 程序 ,输出 结果 如 下 : 


因此 MATLAB 中 程序 执行 人 机 交互 很 直观 ,用 户 可 以 很 轻松 地 实现 相关 的 程序 操 
作 ,for 循环 最 大 次 数 迁 代 不 超过 指定 的 次 数 , 采 用 break 和 continue 语句 可 以 实现 循环 
的 提早 退出 ,具体 视 具 体 的 工程 背景 而 定 。 
2) while 循环 
while 循环 的 句柄 作为 循环 结构 的 先 验 判别 退出 条 件 , 如 打 不 满足 while 退出 条 件 ， 
则 不 执行 相应 的 操作 。 其 具体 的 while 循环 体 使 用 如 下 : 


运行 程序 ,输出 结果 如 下 : 


pb 
[A 

b 三 
二 
2 > 
i = 一 
三 
3 一- 
_ 2 
加 程 
3 人 


从 运行 结果 可 看 出 ,while 结构 首先 是 i 二 3, 初 值 i 二 0 ,满足 while 判别 条 件 ,执行 循 
环 体 ,进行 循环 迄 代 , 迭代 结果 如 上 述 输出 结果 , 当 i 二 3 时 ,i 不 满足 i 二 3, 因 此 退出 
while 入 环 体 , 千 果 最 余 显 示 在 命令 行 Windows 窗口 。while 也 可 能 进行 死 循 环 , 具 体 的 


co. 

Clear, 

close all 

b=0 

i=0 

while i>—1 
i=1441 
b=b+i+1 


enid 


如 果 i 大 于 一 1, 则 表示 程序 一 直 是 成 立 的 ,循环 体 不 会 结束 MATLAB 软件 将 一 直 
显示 为 处 于 busy 状态 ,由 于 while 循环 体 退 出 的 条 件 是 不 满足 循环 体 条 件 , 因 此 导致 循 
环 一 直 执 行 该 操作 ,i 越 来 越 大 ,2 也 越 来 越 大 ,用 于 一 般 只 有 关闭 MATLAB 重启 
MATLAB 进行 其 他 操作 


3. 程序 终止 控制 语句 


return 语句 能 人 够 使 程序 立即 退出 循环 ,T 约 程序 执行 时 间 ,特别 是 内 瞬 循 环 中 ,应 该 
使 用 return 语句 跳出 循环 。 例 如 ,用 于 查找 某 一 个 元 系 ; 如 果 找 到 了 立即 跳出 。 上 有 具 体 的 
return 二 人 铝 使 用 如 下 : 


Cle 
Clear, 
close all 
b=0 
i= 人 0 
if 工 芯 之 
工 二 了 工 十 工 
b=b+i+1 
全 号 扎 
return; 


end 
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运行 程序 ,输出 结 采 如 下 : 
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顺序 执行 return 语句 时 ,立即 跳出 循环 结构 体 ,return 语句 更 多 地 用 在 MATLAB 
轴 数 M 文件 中 。 


4.5 MATLAB 中 的 函数 及 调用 
4.5.1 罗 数 类 型 


MATLAB 中 的 因数 类 型 较 移 ,各 用 的 有 匿名 因数 、M 文件 主 琅 数 、 般 套图 数 、 了 于 肯 


1. 匿名 函数 


匿名 上 六 数 通 各 是 用 于 篆 用 的 明 数 的 求解 ,如 正弦 困 数 、 余 嘴 图 数 、 线 性 因数 .高 次 方 
程 等 。 匿 名 上 盟 效 百 观 可 见 :求解 较 方 便 。 有 具体 的 创建 匿名 因数 的 标准 格式 如 下 : 


了 = @(x) f(x) 


其 中 : 

(1) 人行 号 “@ ”是 MATLAB 中 创建 郴 数 句柄 的 操作 符 , 表 示 这 是 对 一 个 藉 数 进行 操 
作 , 得 到 相应 的 函数 表达 式 , 上 述 即 是 y 关于 x 的 函数 表达 式 ，。 

(2) 工 是 自 变 量 , 表 示 这 个 方程 (x 十 2、sin(x) ,cos(x)) 中 的 自 变 量 x, 如 果 自 变量 是 
+, 则 方程 汶 1 十 2、sin(1)、cos(1) 等 ,MATLAB 系统 默认 为 工 变量 。 

(3) f(z) 即 是 函数 表达 式 , 通 常 为 一 个 显 式 表达 式 , 如 t 十 2、sin(1) 、cos(1)、sin(1) x* 
cos(7?) 等 。 

匿名 上 师 数 的 创建 具体 如 下 : 


Sle 

Clear 

Close all 

Y= @(x)(x+2) 
yY(2) 


运行 程序 ,输出 结 采 如 下 : 


VW 


(D(x) (x+2) 
4 
该 方程 表示 y= 二 x 十 2, 当 x 二 2 时 ,y 二 4, 和 MATLAB 输出 结果 是 一 致 的 。 同 样 对 于 
下 列 孙 数 表 达 式 求解 有 同样 的 效果 。 编 程 如 下 : 
Clear 


了 = @(x)(x* sin(x)) 
y(pi/2) 


运行 程 订 ,输出 结 末 如 下 : 


@ (x) (x* sin(x)) 


上 | 


- 371708 


: 
ll 


.8415 


了 
卢 | OO 
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匿名 因数 操作 侧 单 且 方 便 ,. 用 户 可 以 更 加 直观 地 知道 程序 计算 流程 ,匿名 畏 数 在 求 
和 解 方程 中 广泛 应 用 ,一 方面 是 使 用 催 便 , 夯 一 方面 是 万 约 代 码 行 数 。 
主 果 数 可 以 与 为 脚本 文件 也 可 以 与 为 主 果 数 文 件 , 主 要 是 由 于 格式 上 的 差异 ,如 : 
function 


end 
主 困 数 是 MATLAB 编程 中 的 关键 环节 ,几乎 所 有 的 程序 都 在 main 文件 中 操作 


元 成 。 
3. 子 函 数 


于 图 数 对 应 于 主 困 数 ,隶属 于 主 果 数 , 用 户 可 以 通过 目 己 编写 的 了 于 图 数 供 主 果 数 调 
用 :这 样 的 图 数 文件 表示 为 子 图 数 文件 ,了 于 图 数 里 面 的 变量 独立 存在 :与 主 图 数 不 冲 突 ， 
所 有 的 了 图 数 在 同一 个 文件 夹 下 供 该 路 径 下 的 主 图 数 文 件 调用 。 

子 图 数 书写 有 利于 优化 程序 ,精简 程序 代码 , 子 图 数 通 篆 供 客户 目 己 根据 目 己 的 项 
目 需 要 进行 编写 。 有 具体 的 求解 数组 的 均值 和 方差 的 程序 示例 如 下 : 


function ysw4 3 
二 


此 dVTLYWM 其 四 司 


程 
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xl1 = mean(x) 和 均值 
x2 = std(x) 第 方差 
end 


function yy = mean(x, dim) 

if nargin== 1, 
向 Determine which dimension SUM will use 
dim = find(size(x)—~— =1, 1 ): 
it isempty(dim), dim = 1; end 


a sum(x) /sizel(lx, dim); 


y = sum(x,dim)/size(x, dim); 


function yy = std(varargin) 
y = sgrt(var(varargin{ :})); 


end 


运行 程序 ,输出 结果 如 下 : 


2. 5000 


1 .2910 


4 私有 函数 


私有 函数 文件 是 独立 存在 的 文件 夹 和 下 的 程序 ,将 其 复制 到 其 他 计算 机 下 的 
MATLAB 也 能 运行 ,也 就 是 程序 文件 只 供 自 号 文件 夹 下 的 脚本 文件 调用 。 例 如 ， 
MATLAB 当前 路 径 为 H:\MATLAB Edit 2013a\ysw ,在 这 个 路 径 下 的 主 函 数 文 件 可 调 
用 用 户 编 写 的 私有 函数 。 

私有 上 盟 数 中 的 每 个 图 数 用 户 可 以 注释 得 很 详细 ,以 至 于 下 次 调用 时 ,能 够 理解 这 个 
代码 完成 的 功能 及 输入 和 输出 参数 的 含义 。 


5. 重 载 函数 


“ 重 载 "是 计算 机 编程 中 较 少 见 到 的 函数 命令 ,基本 的 数值 计算 通常 为 long 型 和 
short 型 ,或 者 分 数 类 型 rat。 基 本 的 格式 如 下 : 
>> format long 


>> format short 


>> format rat 


对 于 数据 类 型 的 确定 , 重 载 盯 数 能 够 单独 地 设置 变量 的 类 型 ,如 单 精 度 浮 点 类 型 、 双 
精度 浮上 点 类 型 等 。 对 于 一 些 高 精度 的 工程 计算 以 及 快速 计算 等 数据 精度 都 不 同 , 因 此 
MATLAB 重 载 国 数 能 够 较 好 地 提高 计算 效 计 。 

在 MATLAB 中 ,@double 表示 双 精 度 浮 点 类 型 ,@int32 表示 32 位 整 型 ,@int8 表 
示 8 位 整 型 ,等 等 。 


4.5.2 国 数 参数 传递 


MATLAB 编写 图 数 ,在 图 数 文 件 头 震 要 与 明和 输入 和 输出 变量 , 方 能 构成 一 个 完整 的 
可 调用 函数 ,在 主 函 数 中 调用 时 ,通过 满足 输入 关系 ,选择 输出 的 变量 ,也 就 是 相应 的 孙 
数 参 数 传 递 ,MATLAB 将 这 些 实际 值 传 回 给 相应 的 形式 参数 变量 ,每 一 个 羡 数 调用 时 变 
量 之 间 互 不 冲突 , 均 有 自己 独立 的 函数 空间 。 


1. 函数 的 直接 调用 
对 于 求解 变量 的 均值 程序 ,编写 图 数 如 下 : 


functiony = mean(x, dim) 


其 中 ,zx 为 输入 的 变量 ; dim 为 数据 的 维 数 ,默认 为 1。 直接 调 用 该 图 数 即 可 得 到 相 
应 的 均值 解 。MATLAB 在 输入 变量 和 输出 变量 的 对 应 上 ,优选 第 一 变量 值 作 为 输出 变 


量 。 当 然 , 也 可 以 不 指定 输出 变量 ,MATLAB 默认 用 ans 表示 输出 变量 对 应 的 值 。 


在 MATLAB 中 可 以 通过 nargin 和 nargout 函数 来 确定 输入 和 输出 变量 的 个 数 , 有 
些 参数 可 以 避免 输入 ,从 而 提高 程序 的 可 执行 性 。 
求解 矩阵 均值 的 函数 如 下 


functiony = mean(x, dim) 
if nargin == 1, 
多 Determine which dimension SUM will] use 
dim = find(size(x)})—=1,1 ): 
if isemptvy(dim), dim = 1; end 


= sum(x)/size(x, dim); 


Vy = sum(x, dim)/size(x, dim):; 


nargin 一 ] 时 ,系统 默认 dim 一 1, 则 根据 y 二 sum (zx) /size(zT ,dim) 进 行 求解 ; 大 dim 
为 指定 的 一 个 值 ; 则 根据 > 二 sum(xz,dim)/size(x ,dim) 进 行 求 解 。 具 体 调 用 如 下 : 


ce 


Clear 


半 些 4YVTLYW 治 四 衬 


wh 


上 人 

如 去 如 如 号 

Ek Ek 民 Ek 
3 要 & . 要 3 
: 过 : 过 . 届 过 | 
os 和 由 入 由 人 下 和 了 每 
a 起 起 起 二 让 人 也 
3 四 如 网 去 四 四 
k < 站 < L < < 
三 划 各 起 和 伺 起 往 则 担 起 


二 PY 


总 = 一 
zz. S000 


由 上 述 分 析 可 知 , 对 于 该 均值 限 数 ,dim 的 赋值 雷 要 匹配 息 阵 的 维 数 ,对 于 dim 为 1 
时 求解 的 为 列 平均 , 当 dm 一 2 时 求解 的 为 行 平均 。 如 来 没有 指定 输出 的 变量 ， 
MATLAB 系统 默认 为 由 ans 变量 百代 ,如 采 指 定 了 输出 变量 , 则 显示 输出 对 应 的 学 苹 变 
量 对 应 的 值 。 


2. 全 局 变量 


全 局 变量 在 大 型 的 编程 中 较 常 用 到 ,特别 是 在 GUI 设计 中 ,对 于 每 个 按钮 功能 模块 
下 的 运行 程序 , 则 需要 调用 前 面 对 应 的 输出 和 输入 的 变量 ,这 时 需要 对 应 的 全 局 变量 。 
全 局 变量 在 MATLAB 中 用 global 表示 ,指定 全 局 变量 后 ,该 变量 能 够 分 开 在 私有 函数 、 
子 函 数 . 主 函数 中 使 用 ,全 局 变量 在 整个 程序 设计 阶段 基本 保持 一 致 。 

对 于 全 局 变量 的 使 用 如 下 


当 全 局 变量 
function ysw4 4 
Se. 
Clear 
close all 
global a 
已 二 了 之; 
二 
Y= ysw(x) 
end 
function y= yswl(x) 
global a 
y= ax (x"*2) 
end 


运行 程序 ,输出 结 采 如 下 : 


18 


从 程序 运行 结 末 可 知 , 全 局 变量 只 需要 在 主 哨 数 中 进行 声明 ,然后 使 用 global 在 主 
半 数 和 于 函数 中 分 别 进行 定义 即 可 ,最 后 调用 对 应 的 函数 , 即 可 完成 函数 的 计算 求解 。 


4.6 MATLAB 程序 调试 


MATLAB 程序 出 错 主 要 为 格式 错误 和 算法 错误 。 

格式 错误 简单 可 见 , 可 以 轻松 地 进行 查找 。MATLAB 提供 了 用 于 格式 错误 查找 的 
显示 功能 ,特别 是 中 文字 符 输 入 下 ,MATLAB 显示 为 红色 字体 ,因此 用 户 的 错误 多 体现 
在 算法 销 误 上 。 


-二 > 六 蕉 4YTLYW 天 图 党 
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算法 错误 较 难 ,一 方面 用 户 可 能 不 知道 算法 程序 的 深层 次 原理 ,导致 编程 结果 求解 
错误 ,代码 程序 格式 没有 任何 错误 而 产生 的 求解 错误 , 另 一 类 是 算法 求解 时 执行 效率 低 ， 
耗 用 资源 太 大 ,系统 出 现 debug 错误 或 者 是 算法 中 出 现 奇异 点 ,导致 程序 的 终止 。 对 于 
算法 错误 , 较 多 的 做 法 是 输出 每 一 步 对 应 的 结果 ,对 每 个 结果 进行 核查 ,直到 找 出 相应 的 
错误 。 

下 面 将 简单 地 阐述 MATLAB 程序 调试 方法 和 调试 所 用 到 的 工具 ,这 能 够 提高 编程 
的 效率 ,达到 优化 程序 的 目的 。 


4.6.1 调试 方法 


MATLAB 程序 有 直接 调试 法 和 工具 调试 法 两 种 。 
1. 直接 调试 法 


直接 调试 法 直接 单 步 运行 程序 ,逐步 地 显示 每 一 步 的 结果 ,可 以 设置 断 点 运行 程序 ， 
以 至 于 快速 查找 错误 所 在 的 地 方 。 具 体 的 做 法 是 让 每 句 代码 后 面 的 分 号 去 掉 , 让 其 输出 
结果 .用 户 根据 自己 的 理解 ,知道 该 地 方 应 该 输出 什么 结果 ,从 而 可 以 很 好 地 判断 错误 所 
在 的 地 方 。 具 体 的 代码 如 下 ， 


le. 

clear 

close all 

琉 三 1 

Vl = x sin(x) # cos(x) /log(x) 
Y = (@(x)(x+ 2) 

y(2) 


运行 程序 ,输出 结 采 如 下 : 


(2 (x) (yl1) 
ans = 
Inf 


从 结果 可 看 出 ,yl 出 现 Inf 极 大 值 ;说 明 该 结果 无 解 或 者 程序 有 误 ; 对 于 yl 一 工 * 
sin(Zz) * cos(X)/log(x), 由 于 x 二 1, 由 此 可 得 到 log(Cz) 一 0, 由 于 0 不 能 作 人 分母, 因此 使 
得 结 朱 输出 为 无 穷 大 。 修 改 程序 如 下 : 


Close all 


下 二 1 


YL = xXx* Sin(x) * cos(x)/log(2 * x) 
Y= @(x) (Yl) 
y(2) 


ph 
| 
羡 
三 
wh 
a 
> 
[== 
编 
程 
人 
1] 


(® (x) (y1) 
TS 三 
0.6559 


上 述 查 找 方法 采用 了 直接 调试 法 ,能 够 很 快 地 定位 程序 的 错误 .用户 只 需要 知道 最 
基本 的 隐 数 用 法 即 可 修改 程序 问题 从 而 求 得 问题 解 。 

2. 工具 调试 法 

MATLAB 有 一 些 工 具 按 钮 ,供用 户 人 使用。 例如 ,可 以 在 程序 里 面 设置 一 些 断 点 , 利 
用 编辑 需 华 单 中 的 一 些 选项 进行 调试 。 


编辑 禹 沫 单 用 于 程序 调试 , 们 单 上 有 编辑 着 下 拉 沫 单 , 用 户 可 以 直接 对 程序 进行 修 
改 和 设置 。 具 体 如 图 4-6 所 示 。 


图 4-6 M 文件 工具 条 


(1) 编辑 打开 : 用 于 调试 时 打开 M 文件 。 
(2) 单 步调 试 : 用 于 单 步调 试 程序 。 
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(3) 调试 进入: 用 于 单 步调 试 进 入 子 肾 数 。 

(4) 调试 退出 : 用 于 单 步调 试 从 了 于 因数 跳出 。 

(5) 继续 : 程序 执行 到 下 一 断 点 。 

(6) 清除 断 点 : 清除 所 有 打开 文件 中 的 断 点 。 

(7) 错误 停止 : 在 程序 出 错 或 报警 处 停止 往 下 执行 。 

《8) 退出 : 退出 调试 模式 。 

对 于 MATLAB 调试 ,MATLAB 提供 了 F9 快捷 键 进行 选中 的 程序 运行 ,也 可 以 按 
住 Ctrl 十 Enter 键 对 程序 进行 运行 。 当 然 , 对 于 工具 调试 也 有 一 些 快捷 键 。 

(1) 快捷 键 F10: 实现 单 步 调试 。 

(2) 快捷 键 F11: 用 于 单 步 调试 进 人 子 晒 数 。 

(3) 快捷 键 Shift 十 F11: 用 于 单 步调 试 从 子 苑 数 跳 出 。 

(4) 快捷 键 F5: 实现 程序 执行 到 下 一 断 点 。 

MATLAB 因 其 调试 的 简便 性 以 及 可 操作 性 应 用 越 来 武 广 :人 性 化 的 交互 使 得 用 户 
可 以 更 加 轻松 地 调试 代码 。 


4.6.2 M 文件 分 析 工 具 


M 文件 分 析 工 具 主 要 借助 于 分 析 代 码 分 析 工 具 , 通 过 分 析 代 码 分 析 虽 ,用 户 可 以 知 
道 代码 的 执行 效率 ,可 以 适当 对 程序 进行 修改 。 分 析 代 码 分 析 工 具 和 市 有 图 形 操 作 界 面 ， 
使 用 方便 和 何 捷 ,只 需要 单 击 即 可 对 打开 的 M 文件 进行 分 析 , 得 到 相应 的 结果 。 分 析 代 码 
工具 条 在 MATLAB 主 窗 口上 ,如 图 4-7 所 示 。 


MATLAB R2016a 


图 4-7 分 析 代 码 工具 条 
对 于 多 项 式 拟 合 问题 ,编写 MATLAB 程序 如 下 : 


function [y, delta] = polyval(p,x, 3,mu) 
多 Check input is a vector 
if ~ (isvector(p) || isempty(p)) 
error(message( 'MATLAB:polyval:InvalidP')):; 
end 


nc = length(p); 
if isscalar(x) && (nargin < 3) St& nc>0 SS isfinite(x) SS all(isfinite(p( :)})}) 
$% Make it scream for scalar x. Polynomial evaluation can be 
多 implemented as a recursive digital filter. 
了 = filter(1,[1 -x],P); 
7 = y(nc); 


return 
end 
siz X = size(x); 
if nargin == 4 
x = (x — ml1))/mu(2):; 
end 


多 Use Horner's method for general case Where 其 1s am array. 
Y = zeros(siz x, superiorfloat(x, p)):; 

if nec>0, vy(:) = pl end 

for 工 三 之 :me 


Y= xXx.¥* y+ p(i); 


if nargout > 1 
if nargin < 3 || Isempty(S) 
error(message( 'MATLAB:polyval:RequiresSs')); 
end 


$$ Extract parameters from 3 


if isstruct(S), Use output structure from polvyfit. 


R = S.R; 
df = 5S. df.; 
Normr = 3S. normr:; 


else 多 Use output matrix from previous versions of polvyfit. 


[ms,ns|] = size(S); 
if (ms 一 - = ns+2) || (nc ~— = ns) 
error(messagel 'MATLAB: polyval :SizeS')).; 


R = S(t(l:nc,l:nc):;: 
df = Silnc+i+1,1);: 
normr = S(nc+ 2,1):; 
end 
向 Construct Vandermonde matrix for 七 he mew X. 
XX 一 Xl:); 
V(:,nc) = ones(length(x),l1,class(x)).; 
| 
V(:,j) = x. x V(:,j+1); 
end. 
E = V/R; 
e = sgrt(1+ sum(E. x E,2)); 
if df == 0 
warning(message( 'MATLAB:polyval :ZeroDOF') ); 
delta = Inf(size(le)). 
else 
delta 


normr/sqrt(df) x* e; 
end 
delta = reshapeldelta, siz x); 
end 


上 
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行 分 析 代 人 码 工具 后 ,结果 如 图 4-8 所 示 。 


硕 Web 浏览 器 - 代码 分 析 器 报告 
| | 代码 分 析 器 报告 x | 十 | 
各 时 守 | 对 | 的 


代码 分 析 希 报告 


此 报告 显示 可 能 存在 的 错误 和 问题 ， 以 及 改善 MATLAB 程序 的 机 会 (了解 更 匀 ) 
| 重新 运行 此 报告 || 对 当前 文件 卖 运 行 报告 


隐 件 去 D:\Program Files (xS06N NMA TILAB'\work Matlab calculatron 2016\chapter03 的 报告 


3.m | 使 用 分 号 终止 语句 可 在 在 脚本 中 取消 输出 。 
贡 | 使 用 分 号 终止 语句 可 在 在 脚本 中 取消 输出 。 
使 用 分 号 终止 语句 可 在 在 脚本 中 取消 输出 。 


10 使用 分 号 终止 语句 可 在 在 脚本 中 取消 输出 。 


。 


图 4-8 ”代码 分 析 器 分 析 结 果 


从 图 4-8 中 可 以 看 出 ,分 析 代 人 码 冀 分 析 完 成 后 ,会 返回 一 个 浏 宽 冀 界面 下 的 代码 分 析 
三 报告 ,报告 中 列 出 了 每 个 打开 文件 的 信息 ,用 户 可 以 根据 声 意 对 每 个 信息 进行 调整 ,也 
可 以 达到 优化 程序 的 目的 。 


4.7 MATLAB 常用 编程 技巧 


MATLAB 作为 一 款 人 机 交互 和 谐 的 科学 计算 软件 ,有 着 很 多 其 他 语言 的 语言 特征 ， 
编程 形式 和 C、C++、Fortran 等 高 级 语言 相 类 似 , 用 户 能 够 很 方便 地 编写 程序 实现 相应 的 
功能 。MATLAB 编程 宫 要 很 多 技巧 ,当然 这 些 技 巧 需要 用 户 长 期 地 积累 , 方 能 很 好 地 测 
握 MATLAB 应 用 。 下 面 将 对 第 用 的 MATLAB 编程 技巧 进行 分 析 , 让 遮 者 有 一 个 直观 
的 理解 。 


4.7.1 循环 计算 
循环 计算 可 大 大 地 节约 编程 计算 的 时 间 , 对 于 大 数据 处 理 很 实用 ,而 且 一 般 的 和 矩阵 


也 较 多 的 为 M 行 N 列 , 对 于 单一 点 的 处 理 越 来 越 少 。 其 中 MATLAB 中 使 用 较 多 的 循 
环 语 名 有 for 和 while 语句 。 


对 于 循环 的 使 用 需要 注意 以 下 儿 点 : 
(1) 为 了 提高 执行 速度 和 编程 计算 处 理 效 率 , 一 般 应 该 尽量 避免 使 用 循环 求解 的 方 


陈 , 可 采用 窍 阵 的 百 接 求 解 计算 。 
(2) 为 了 方 约 处 理 代 人 码 行 数 , 达 到 大 数据 处理 的 目的 ,合理 地 选用 循环 语句 对 该 数据 
进行 处 理 。 


(3) 尽量 使 用 MATLAB 内 置 果 数 ,达到 求解 的 目的 ,以 提高 求解 精度 和 速度 。for 
和 while 循环 每 执行 一 次 招 令 人 将 降低 系统 执行 效率 


4.7.2 ”使 用 例外 处 理 机 制 


- 山 程 序 为 了 捉 局 使 用 率 , 捉 局 程序 的 可 实用 性 :可 采用 标准 化 编程 :尽量 使 程序 能 
够 适应 从 初学 者 到 高 手 的 使 用 。MATLAB 中 提供 了 用 于 检测 程序 执行 时 间 的 上 因数 己 上 贤 
数 输 入 和 输出 个 数 的 判断 函数 。 对 于 执行 时 间 , 有 基体 如 下 : 


Bl be 

Clear 

close all 

tic 人 秆 启 动 
二 
B=[1i.00,.1|.; 
blkdiag(a,b) 
toc 车 停止 


运 才 本 程序 ， 输出 结果 如 下 : 


ans 一 
1 0 0 0 
0 1 0 0 
0 0 1 0 
0 0 0 1 


Elapsed time is 0.00090] seconds. 


从 结果 可 知 ,MATLAB 运行 速度 很 快 。 对 于 错误 的 代码 ,MATLAB 可 以 通过 用 户 
自己 设置 的 程序 进行 判别 。 对 于 上 例 ,; 如 果 输 入 有 错误 ,; 则 给 出 提示 有 误 等 信息 。 上 有 具体 
的 代码 如 下 : 


le. 
Clear 
close all 
tic 先 启 动 
A= 一 1，; 
if a<0 
error(' 请 输入 一 个 正 数 '); 
el]Sse 
Y= sqrt(a); 
end 
toc 竺 和 悖 止 


运行 程 订 ,输出 结果 如 下 : 


请 输入 一 个 正 数 


一 和 
= 


qvVTLYIN 


i 
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全 站 
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修改 a 的 值 ,具体 如 下 : 


已 二 之; 
if a<0 
error(' 请 输入 一 个 正 数 '); 
else 
Y= sqrt(a) 
end 
toc 竺 停止 


运行 程序 ,输出 结果 如 下 : 


， 三 
1.4142 


Elapsed time 1s0.000092 seconds. 
> 


显然 ,这 个 a 取 值 为 负 值 ,不 满足 和 条件, 系统 提示 有 问题 , 当 a 一 2 时 ,求解 结果 正确 。 
程序 员 在 编程 时 ,可 以 根据 系统 提示 修改 相应 的 错误 信息 。 

此 外 ,MATLAB 也 提供 了 相应 的 变量 输入 /输出 的 判断 , 即 nargin 和 nargout 的 用 
法 ,nargin 用 于 国 数 输入 个 数 的 判断 ,nargout 用 于 输出 个 数 的 判断 。 有 具体 的 使 用 如 下 : 


EunctionyYy = mean(x, dim) 
if nargin == 1, 
SS Determine which dimension SUM will use 
dim = find(size(x)}— =1,1 ):; 


if isempty(dim), dim = 1; end 
Y = sum(x)/size(x,dim); 


y = sum(x, dim)/size(x, dim):; 
end 
end 
function vy = std(varargin) 
Y = sqrt(var(varargin{ :})); 
end 


nargin 用 于 判断 输入 变量 的 个 数 , 系统 默 认为 1 个 变量 ,如 果 指 定 dim 的 值 也 可 以 。 
采用 nargin 和 nargout 可 以 适应 不 同 的 输入 法 ,使 得 程序 适用 性 更 广 。 


4.7.3 通过 varargin 传递 参数 
varargin 可 以 作为 输入 的 消 数 的 参量 ,主要 做 于 了 清 数 的 可 选项 参数 ,MATLAB 中 能 


够 实现 程序 的 自动 校正 ,从 而 产生 人 代码。 具体 的 例如 对 一 个 图 像 进行 处 理 , 编 写 显 示 图 
像 程 序 如 下 : 


function Ceateftigureltcdatal，cdata2，cdata3，cdata4d) 


多 CRERATEEFIGURE(UCDRATRA1L，CDRATRA2，CDRATA3，CDRATRA4 ) 
$$ CDATAl: image cdata 

多 CDATA2: image cdata 

多 CDATA3: image cdata 

多 CDATA4: image cdata 

figqgurel = figure; 


并 鉴 HVTLVIN 由 四 菩 


六 


colormapl( 'gravy'); 


秆 创建 subplot 


= 
N= 


subplotl = subplot(2,2,1,'Visible', 'off', 'Parent',figurel, 'YDir', 'reverse', »: 


'TickDir', "out', .»…. 
‘Dayer', 'top', ~ 
'DataAspectRatio',[1 1 工 ]|，… 
‘CLim’',[0 255]) ; 

box( subplotl 'on'); 

hold( subplotl, 'all'); 


向 创建 image 
image(cdatal, 'Parent', subplotl, 'CDataMapping', 'scaled' ); 


竺 创建 七 让 le 
title(l 'red'): 


第 创建 subplot 


subplot2 = subplot(2,2,2,'Visible', 'off', 'Parent',figurel, 'YDir', 'reverse', -: 


'TickDir', ‘out', …- 
‘Layer', "top', » 
'DataAspectRatio',[l111],.: 
‘CLim',[0 2551]1); 

box( subplot2, 'on'); 

hold( subplot2, 'all'); 


秆 创建 Image 
imagel(cdata2, 'Parent', subplot2, 'CDataMapping', 'scaled' ); 


竺 创建 七 jtle 
title(l 'green'); 


秆 创建 subplot 


subplot3 = subplot(2,2,3,'Visible', 'off', 'Parent',figurel, '¥YDir', 'reverse', » 


'TickDir', "out', .- 
‘Dayer', 'top', ~» 
'DataAspectRatio',[1111],.--. 
CLII [0 2551]); 

box( subplot3, 'on'); 

hold( subplot3, 'all'):; 


第 创建 image 
image(cdata3, 'Parent', subplot3, 'CDataMapping', 'scaled'); 
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车 创建 七 让 le 
title( 'blue'): 


subplot4 = subplot(2,2,4,'Visible', 'off', 'Parent', figurel, "YDir', 'reverse', … 
'TiCkEDIr', ‘out', ... 


第 创建 subplot 


| 'DLayer', 'top', » 
| 'DataAspectRatio',[l111],.:: 
\ 'CLim', [0 255]); 

boxl( subplot4 'on'); 

hold( subplot4, 'all'); 


| 秆 创建 Image 
| image(cdatad, 'Parent', subplot4, 'CDataMapping', 'scaled'); 


和 创建 title 
title( ‘justGreen'); 


相应 的 主 程序 如 下 : 


ce 

Clear 

close all 

) im = imread(']1. bmp'); 

| red= im(:,:,1); 

' green= im(:,:,2):; 

blue= im(:,:,3):; 

justGreen = green— red/2 — blue/2: 

' 向 colorsrgbPlot(red, green, blue, JjJustGreen) 


createfigure(red, green, blue, justGreen) 


运行 程序 ,输出 结果 如 图 4-9 所 示 。 


\ 图 4-9 图 像 显 示 


由 于 MATLAB 目 动 生成 的 代码 能 够 目 动 修 改 属 性 , 目 动 加 载 生 成 即 可 得 到 相应 的 
程序 代码 ,上 且 适应 性 较 广 :因此 可 以 大 大 催化 程序 编写 难度 
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本 章 小 结 


本 章 围 比如 何 进 行 MATLAB 编程 为 出 发 点 ,全 面 地 展开 论述 MATLAB 编程 的 注 
意 事 项 。MATLAB 由 置 蚊 数 很 多 ,工具 箱 也 很 丰 蜗 ,用户 可 以 根据 目 身 需要 ,有 选择 性 
地 加 以 学 习 。 多 积累 ,运行 程序 解决 实际 问题 方 能 快速 高 效 ,; 如 何 编程 将 成 为 后 续 编 程 
的 基础 。 


'> 济 此 8VTLYW 内 国营 


ss 
ee 
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EC 
次 
后 
值 
所 
人 


在 科技 工程 中 :除了 要 进行 一 定 的 理论 分 析 外 ,通过 实验 对 所 得 
数据 进行 分 析 、` 处 理 也 是 必 不 可 少 的 法 。 由 于 实验 测定 实际 系 
统 的 数据 具有 一 定 的 代表 性 ,因此 在 人 处理 时 必须 充分 利用 这 些 信息 ， 
又 由 于 测定 过 程 中 不 可 避免 会 产生 误差 , 故 在 分 析 经 验 公 式 时 又 必须 
考虑 这 些 误差 的 影 啊 ,两 者 相互 制约 。 因 此 ,合理 建立 实际 系统 数学 
模型 的 方法 称 为 数值 通 近 法 。MATLAB 提供 了 丰富 的 函数 指令 实现 
数据 的 数值 瘟 近 ,本 章 具 体 讲 解数 据 的 插值 与 分 析 等 内 容 。 

学 习 目 标 : 

。 学 习 和 掌握 插值 拟 合 原理 ; 

。 就 练 掌握 运用 MATLAB( 工 具 箱 ) 进 行 数 据 插 值 拟 合 ; 

。 掌握 和 运用 插值 拟 合 思想 解决 具体 工程 实际 问题 。 


5.1 插值 问题 


工程 实 虐 和 科学 实验 中 ,常常 需要 从 一 组 实验 观测 数据 (ziy yi) 
(i 二 1,2,3,…,n) 中 , 求 自 变量 工 与 因 变 量 y 的 一 个 近似 的 蚂 数 关系 
式 y= fr), 

例如 观测 行星 的 运动 ,只 能 得 到 某 时 刻 t 所 对 应 的 行星 位 置 s;( 用 
经 纬度 表示 ), 想 知道 行星 在 任何 时 刻 上 的 位 置 。 又 如 ,大 气压 测定 问 
题 .导弹 发 射 问题 .程序 控制 铣床 加 工 精密 工件 问题 .长 机 船舶 制造 问 
题 等 邵 属 于 此 类 问题 。 

因为 考虑 到 代数 多 项 式 既 简单 又 便于 计算 ,所 以 就 用 代数 多 项 式 
近似 地 表示 满足 于 个 点 yi 一 ri 一 1,2,3, 2) 的 图 数 关 系 式 y 一 
f(zi) ,此 即 为 插值 法 。 


5.1.1 拉 格 明日 插值 


已 知 717 十 1 个 数据 点 : (Xi Yi) (i= ] 3s »71) | 次 拉 格 有 姑 日 揪 
值 公 式 为 


特别 地 : 一 1 一 ] 时 ,有 


郊 一 奖 ] TO— Xo 
Li 一 yo es 
| i i | 
当 n= 二 2 时 ,有 
1 ,二 《区 一 无 1 儿 次 一 元 | (TO To) (TO Te) (TO— To xO Tx1) 
0 ”9 (xo — X11 (To OO— Xz) 人 (X11 OO— Xo (TIO— Tz) Se (x2 一 To (To CO— TXT1) 


称 为 抛物 线 插值 或 二 次 插值 。 
在 MATLAB 中 编程 实现 的 拉 格 明日 插值 法 图 数 为 ljagrange( ) 。 
调用 格式 : 


f = lagrange(lx,y) 
或 
f = lagrange(x,y,x0) 


其 中 ,zx 为 已 知 数据 点 的 x 坐标 向 量 ; y 为 已 知 数据 点 的 y 坐标 向 量 ; ze 为 插值 点 
的 过 坐标 ; f 为 求 得 的 拉 格 朗 日 插值 多 项 式 或 在 zx。 处 的 插值 。 
编写 拉 格 朗 日 插值 函数 如 下 : 


function Y= lagrange(x0,y0,x) 
n= length(x0); 
m= length(x); 
fori=1:m 
Ex 
Ss= 0; 
for k=1:n 
p=1; 
Ior 三 1:n 
if ] 一 ”三 下 
Pp=PBPxl(z-az0(jj)/ (zao(E) - x0(j) ); 
end 
end 
s=s+px vO(k); 
end 
Y(I) = s; 
end 


end 


【 例 5-1】 如 /(z) 一 二 5 在 [一 5,5] 上 各 阶 导数 存在 ,但 在 此 区 间 取 nn 个 太太 构造 
的 拉 格 于 日 插值 多 项 式 在 区 间 并 非 部 收敛 ;而 是 发 散 得 很 历 害 。 


clc,clear,close all 
本 


rr MATLAB 科 学 计算 


vy = 1./(l+x. * xXx); 

委 精 确 解 曲线 

| Lm 
a 
plot(xj, vj, linewidth' 2) 

hold on 

年 高 次 多 项 式 插值 

yh= lagrange(x,y, xj); 

plot(xj, vyvh, rT —— ','linewidth',2) 
grid on;xlabel( 'x') ,ylabel('y') 
legenc( ' 原 数据 曲 钱 '，' 播 值 曲 线 ) 


运行 程序 ,输出 结果 如 图 5-1 所 示 。 


| | | 
一 一 原 数 据 曲 线 
一 一 一 插值 曲线 


图 5-1 拉 格 朗 日 插值 


由 图 5-1 可 知 ,一 般 避 人 鲍 多 项 去 次 方 超过 四 次 方 。 为 避免 下 格 ( 人 Runge) 现象 提出 分 
段 插值 。 所 谓 分 段 插值 ,就 是 自 先 把 插值 点 分 开 , 在 每 一 段 上 用 低 次 插值 , 骨 连 接 起 来 ， 
如 分 段 线性 插值 .分 段 二 次 插值 .分 段 三 次 插值 等 。 


5.1.2 牛顿 均 差 插值 


牛顿 均 差 插值 公式 为 
N, 一 f(xo) 十 >3 ee ee [| 《天 一元) 
式 中 »/ (xo 1 2 是 k 耻 均 差 ， 可 由 均 差 表 一] 方便 计算 得 到 o 
拉 格 天 日 插值 和 和 牛顿 均 差 插值 本 质 上 一 样 的 ,只 是 形式 不 同 而 已 ,因为 插值 多 项 式 
是 唯一 的 。 
系数 的 计算 过 程 如 表 5-1 所 示 。 


表 5-1 均 差 计算 表 


(ra) Flo rors | Lzovzioze] | flxo ,x1 xs sx | flLxo rozn 


在 MATLAB 中 编程 实现 的 均 差 形式 的 牛顿 插值 法 孙 数 为 Newton( ) 。 
功能 : 求 已 知 数 据点 的 均 差 形式 的 牛顿 插值 多 项 式 ，。 
调用 格式 : 


XI = Newtonl( fun, x0,D) 


其 中 ,zy 为 所 求 非 线性 方程 的 解 ; fun 为 所 定义 的 图 数 ; xo 为 初始 值 ; DD 为 计算 的 
精确 度 。 
在 MATLAB 中 实现 利用 均 差 的 牛顿 插值 的 代码 如 下 : 


function xr = Newton( fun, x0,D) 
当 xT 为 所 求 非 线 性 方程 的 解 
多 fun 为 所 定义 的 函数 
当 xX0 为 初始 值 
车 D 为 计算 的 精确 度 
[E0,dft | = feval(fun, x0); 
1f df == 0; 
error('d[f(x}/dx] = 0 at x0').; 
end 
if nargin < 3; 
Be 
end 
d= f0/df; 
while abs(d)>D:; 
Xl1] = x0—d; 
XO = Xl1; 
[£0, df | = feval(fun, x0); 
if df == 0; 
error('d[f(x)]/dx= 0 at x0'): 
end 
d= £f0/df; 
end 


Xr 二 X11- 


【 例 5-2〗 如 /Cz) 一 二 在 [一 5,5] 上 各 阶 导数 存在 ,但 在 此 区 间 取 个 节点 构造 
的 牛顿 插值 多 项 式 在 区 间 并 非 都 收敛 ,而 是 发 散 得 很 厉害 。 


- MATLAB 科 学 计算 
主 胃 数 编程 如 下 : 


clce,clear, close all 
5- 

y= 1./(l1+x. * Xx): 

和 精确 解 曲 线 

w= 
"A 

plot(xj, vj, ‘linewidth',2) 

hold on 

当 高 次 多 项 式 播 值 

Yh = Newton(x, y, xj); 

plot(xj,vh, ‘rT—— ','linewidth',2) 
grid on;xlabel( 'x') ,ylabel('y') 
legend( ' 原 数据 曲线 ', ' 播 值 曲线 ') 


运行 程序 ,输出 结 采 如 图 5-2 所 示 。 


-一 一 所 数据 曲线 
一 一 一 插值 曲线 


一 一 一 本 一 一 一 下 一 一 一 


对 比 图 5-1 和 图 5-2 可 知 , 拉 格 姑 日 插值 和 和 牛顿 均 差 插值 本 质 上 是 一 样 的 。 


5.2 一 维 数据 插值 


MATLAB 提供 的 限 数 interp10) 可 以 根据 已 知 数据 表 Lzx,yj, 用 各 种 不 同 的 算法 计 
算 zi 各 点 上 的 因数 近似 值 。 该 晒 数 有 三 种 调用 形式 。 

(1) yi 一 interp1(Cxv,yyxi) : 根据 数据 表 | x,y jj; 用 分 段 线 性 插值 算法 x; 各 点 上 的 图 数 
近似 值 yw 为 尽 可 能 通 近 的 最 小 误差 对 应 的 因 变 量 值 。 当 y 是 回 量 时 : 则 对 > 回 量 手 
值 :得 到 结 采 yi 是 与 Xx; 同样 大 小 的 癌 量 ; 当 y 是 窍 阵 时 : 则 对 y 的 逐 列 癌 量 插值, 得 到 
结 末 y; 是 一 和 矩阵, 它 的 列 数 与 y 的 列 数 相同 , 行 数 与 x; 的 大 小 相同 。 

(2) yi 二 interpl(y,yi): 格式 调用 方法 与 yi 一 interpl(x,y,xi) 相 同 , 只 是 插值 节点 不 


同 , 此 时 用 节点 序号 Xx 二 1:n,n 二 size(Yy)。 
(3) Yi 一 interpl1(Cxyyy xi method): 因数 调用 与 vi 一 interp1(Cx,yyxi) 、 yi 一 interp1(CYy， 
vi 相同 ,只 是 需要 指定 输入 参数 method 的 具体 算法 。 在 MATLAB 中 ,method 有 四 种 
形式 ,如 下 : 
>> help interpl 
Vgq = interpl(X,V,XI METHOD) specifies alternate methods. 


The default is linear interpolation. Use an empty matrix [| to specify 
the default. Available methods are: 


'nearest' — nearest neighbor interpolation 


']inear' — linear interpolation 

'spline' 一 piecewise cubic spline interpolation (SPLINE) 
‘pchip' — shape ~— preserving pliecewise cubic interpolation 
‘coubic" 一 same as 'Ppchip' 


'vS5cubijic’' 一 the cubic interpolation from MATLAB 5, which does not 
extrapolate and uses 'spline' if XX is not equally 
spaced. 


1. linear: 分 段 线 性 插值 ,默认 值 


分 段 线 性 插值 是 在 每 个 小 区 间 [zx;,xit1」 上 采用 简单 的 线性 插值 。 在 区 间 [Lzxi,xit1j 
上 的 了 于 插值 多 项 式 为 


F, = 人 (Ti) 1 一 
Ti 1 il 上 


由 此 整个 区 间 Lxzi.,x」] 上 的 插值 旺 数 为 


Fx) = pa A 


一 】 


式 中 ,oz) 的 定义 为 
| 雹 车 | 天 TD) 


PK(zr) = | TXELzs Ta iA nn) 
人 LU， TE Lr ri 
分 段 线性 插值 方法 较为 稼 用 ,在 实际 计算 中 ,处 理 速度 较 快 ,但 是 海量 数据 本 刁 而 
言 : 以 及 非 线 性 问题 ,人 处理 误差 较 大 ,线性 插值 方法 获得 的 曲线 不 是 平滑 的 ,因此 .根据 实 
际 情况 要 求 进行 选 用 。 上 有 具体 的 线性 插值 程序 如下: 


clce,clear, close all 

format short 

hold off 

wx 117 

vz= md Td bn nd nd nd bd I 2 292 2.20 1 8|-: 
wa 17: 


DO 
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E0 = interpl (xx, vx, 30r1) 

f1 = interpl (xx, vx, xxi, ‘linear') 
plot(xx, vx, 'T x ', ‘linewidth', 2) 

hold on 

grid on 

车 plot(xxi,f0,'r. — ','linewidth', 2) 
plot(xxi,f1, 'b—— ','linewidth',2) 
legend(' 原 好 数据 ',' 线 性 插值 ') 


运行 程序 ,输出 图 形 如 图 5-3 所 示 。 


原始 数据 
一 一 一 线性 插值 


0 5 10 15 20 


图 5-3 ”线性 插值 


2. cubic: 分 段 三 次 多 项 式 播 值 


cubic 三 次 多 项 陈 插 值 法 插值 精度 较 遍 :插值 曲线 较 平 清 , 对 于 插值 精度 要 求 较 高 的 
计算 中 ,可 以 采用 ,然而 就 是 计算 所 需要 的 内 存 较 多 ,计算 的 时 间 也 较 长 ,实际 应 用 中 可 
适当 权衡 。 

具体 的 分 段 三 次 多 项 式 插 值 程 序 如 下 : 


clc,clear,close all 

format short 

hold off 

wx=1:1:1i: 

vr = |3.5d 4 4.60.59.5 4.5. 4,959.4.6.4. 434.9.3 2 98.2.59 2 .2,20.1.8|- 
nxnl=1:0. 3:17. 

f0 = interpl (xx, YE xx1) 

f2= interpl(xx, yx, XI "cubic') 
plot(xx, yx, TT—— ,linewidth',2) 
hold on 

plot(xxi,f2, ro ','linewidth',2) 
legend(' 原 始 数 据 ', ' 三 次 插值 ') 
grid on 


运行 程序 得 到 如 图 5-4 所 示 图 形 。 


S$.5T 


: -一 -原始 数据 
5.0 i pF = jd 
/ 、 一 一 二 次 插值 
| | 
| 1 ， | | 
4.5| -—--1-- a eet 
| 和 | I 
画 | | 
2 有 | | 
车 .中 上 一 一 一 时 一 一 一 一 广 一 一 i 5 Pos | 
IS = = == Ns 
| Ih 
| | 
We me Ne ee i 
ee 
| | I 
i | | 
| | 人 
和 | | | 
I | | 
| | | 
村 ER i = = = 
< 1 I TE 
L I | | 
‖ | | | 
1 .3 
0 2 | 0 各 10 1 2 14 16 18 


图 5-4 三 次 多 项 式 捕 值 


3. spline: 三 次 样 条 播 值 


即 在 每 个 分 段 ( 子 区 间 ) 内 构造 一 个 三 次 多 项 式 , 除 使 其 插值 明 数 满足 差 值 条 件 外 ， 
还 要 求 在 各 个 节点 处 具有 光滑 的 条 件 ( 导 数 存 在 )。 
三 次 样 条 因数 *Czr) 在 每 个 子 区 间 Lzayz] 上 可 由 4 个 系数 唯一 确定 。 因 此 ,sCz) 在 
La,oj 上 有 42 个 待定 系数 。 由 于 sCz)EC La,o]. 则 有 
| —0) = s(x; 0) 
4s Cxi—0)=s (rt0), i= 1,2,3,°"**,n—1 
LA Cr 一 0) 一 Y (zi 十 0) 
为 了 确定 sCz), 通 常 还 需要 补充 边界 条 件 。 常 用 的 边界 条 件 分 为 三 类 : 
(1) 给 定 两 边界 节点 处 的 一 阶 导数 yo(Czo) 王 三 Czo),yo(Czo) 一 六 (ze), 并 要 求 sCz) 
满足 (x0) = yo ,ss (zn) = Yn。 
(2) 给 定 两 边界 节点 处 的 二 阶 导数 yo(Czo) 王 三 (zo),yo(Czo) 一 三 (ze), 并 要 求 sCz) 
满足 $ (zo) 一 ys (ze) 一 mr。 
特别 地 , 若 yo 二 yy 二 0, 则 所 得 的 样 条 称 为 自然 样 条 。 
(3) 被 插图 数 f(x) 是 以 x, 一 xxo 为 周期 的 周期 隐 数 .要求 s(x) 满足 5s (x0) 二 5 (xn)， 
s (zo0)=s (rs—0),s (xo0)=s (rn,—0)., 
具体 的 三 次 样 条 插值 程序 如 下 : 


clce,clear,close all 

format short 

hold off 

ZL 

可 区 二 【13543655953 5 35 4 6 .4,3.9,.3.3,.2.9,.2.5.2.22.0 ,1.8|1; 


高 党 园 污 


但 


> 奖 


| 


一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 本 
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EL 0 3:17: 

E0O = interpl (xx, yx, xx1) 

f3= interpl (zx, vx, xxi, 'spline') 
plot(xx, yi, 'T—— ','linewidth',2) 
hold on 

plot(xxi, £3, 'k—— ','linewidth', 2) 
legend( ' 原 始 数 据 '，' 样 条 播 值 ') 
grid on 


运行 程序 ,输出 图 形 如 图 5-5 所 示 。 


' 
l 
I 


” 
a. LI 


4. nearest: 最 邻近 区 域 播 值 


即 在 就 近 择 值 方 点 的 区 域 上 的 函数 取 值 为 该 点 晴 数 值 ,该 插值 次数 为 一 个 阶梯 略 
数 , 即 


具体 的 最 邻近 区 域 插值 程序 如 下 : 


clc,clear,close all 

format short 

hold off 

XXX 一 :1:1i: 

本 让 了 5 434 
TEL 一 03517: 

£f0 = interpl (xx, yx, xxi) 

f4= interpl (xx, yx, xxi, 'nearest') 


plot(zr, yx, IT —— ','linewidth',2) 


hold on 

plot(xxi, fd4,'b', "linewidth',2) 
legend( ' 原 始 数据 '，' 了 最 近 区 域 插值 ') 
grid on 


运行 程序 ,输出 结 末 如 图 5-6 所 示 。 


| | 
一 一 一 一 原始 数据 _ 
最 近 区 域 插值 
| | 


| 


-|-- 一 下- 一 


I 
| | 
ee ee 
| 
| 
| 


图 5-6 最 近邻 插值 


【 例 5-3】 已 各 zy 的 初始 矩阵 值 : 利 用 interpl 的 不 同 插值 算法 求 zx;| 1:0.3:17j 时 
各 点 的 图 数 近 似 值 。 编 程 如 下 : 


clc,clear,close all 

format short 

hold off 

X= :1:11-: 

=| 3 5 dd do mo nd Ad 2 2 5 2 ZU 1 8]; 
eal 

£f0 = interpl (xx, yx, xx1i) 

fl1 = interpl (xx, yx, xxi, '] inear') 

f2 = interpl (xx, vx, xxi, ' cubic') 

f3= interpl (x, vx, Xxx1, 'spline') 


f4= interpl] (xx, yx, xxi, 'nearest') 

plot(xx, vax, 'T—— ','linewidth',2) 

hold on 

SE plot(xxi,f0O, 'r. — ', Jinewidth',2) 

plot(xxi,f1l,''b—— ,linewidth',2) 

plot{(xxi, f2, ro ', linewidth' ,2) 

plot(xx1i, f3, KE 一 一 ,linewidth' ,2) 

plot(xxi,f4d,'b', linewidth',2) 

legend(' 原 奴 数 据 ', ' 线 性 插值 ', ' 三 次 插值 ', ' 样 条 插值 ', ' 最 近 区 域 插值 ') 
grid on 
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运行 程序 ,输出 图 形 如 图 5-7 所 示 。 


一 一 一 原始 数据 

_ -一 -一 线性 插值 

一 2 一 二 次 插值 

~ 一样 条 插值 
-一 一 最 近 区 域 插值 

| | 


图 5-7 ”不同 持 值 方法 得 到 的 图 形 
【 例 S-4】 对 于 已 知 坐 标点 ,采用 鼠标 接点 形式 ,以 近邻 插值 、 线 性 插值 .三 次 样 条 插 


值 、 多 项 式 拟 合 形 式 对 坐标 点 集 进行 拟 合 。 编 程 如 下 : 


clc,clear,close all 
clf,a= -1;b=l1l;n= 100; 
当 用 内 联 函 数 inline 命令 定义 函数 
委 在 后 面 可 直接 用 于 函数 g 的 计算 ,要 改变 函数 做 实验 ,可 按 此 格式 重新 定义 g 
g= inlinel'x 2— xXx"*d'); 
xx= linspace(a,b,n); 
for i=1:n 
gx(i) = g(xx(1)); 当前 面 已 经 用 inline 命令 定 义 了 9g, 可 以 这 样 用 gg 计算 肖 数值 
end 
vmin= min(gx) * 0.8; 


ymax = max(gx) * 1.2; 多分 四 个 界面 画图 9 的 图 形 , 以 便于 结果 上 比较 
subplot(2.,2,1), 

plot({s, gx, 1 一 一 1) ,grid, hold on,axis([a b ynin ymar]) titlef 近邻 插值 全 

subplott2 ,2,2)， 

P1leot( xx gx, 一 一 上) ,grid, hold on,axis([a b ymin vymax|),title(' 线 性 插值 ') 
subplot(2,2,3), 


plot(xx, gx, ' —— ') ,grid, hold on,axis([a b vnin vymax|),title(' 样 条 插值 ') 
subplot(2,2,4),plot(xx, gx ' —— '), 
grid, hold on,axis([a b ymin ymax]),title(' 多 项 式 拟 仿 ') 
千 用 息 标 在 屏幕 上 选 点 [x,y,button] = ginput(n), 可 套用 下 面 程序 的 格式 
button=1; 
xl1] = [al; 
yl = [gx(1)]; 
while button == 1 
[xi, yi, button] = ginput(1 )}); 
subplot(2,2,1),h= plot(xi,yi,'ro') 革 在 4 个 图 形 窗 口 画 点 
subplot(2,2,2),h= plot(xi, yi, 'ro') 


subplot(2,2,3),h= plot(xi, vi, 'ro') 
subplot(2,2,4),h= plot(xi, vi, 'ro') 
1 = [xi, al]:vl = [vi, v1]; 名将 选 的 点 存 于 向 量 x1l, yl 
end 

x1=|b,x1|: 

yl = [gx(n),y1]; 

xx = linspace(a, b,n); 名 定义 自 变 量 xx 
当 计算 不 同 的 插值 函数 : xl, yl 为 节点 ,xx 为 输入 自 变量 : 


vynearest = interpl (xl,yl], xx, 'nearest').; 
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ylinear = interpl (xl1,y], xx, 'l]inear' ); 

vspline = interpl (x]l,vl,xx, 'spline' ); 

第 多 项 式 拟 合 指 令 [p,s] = polyfit(x,y,n),n 为 拟 合 多 项 式 次 数 ,x,y 为 被 氢 合 数据 

秆 记 为 拟 合 多 项 式 的 系数 ,ss 是 用 来 做 误差 估计 和 预测 的 数据 结构 

Lp, cj] = polyfit(x1, yl, 4); 

ypolyfit = polyval(p, xx); 和 用 polyval(p,x) 计 算 系 数 为 p 的 多 项 式 在 标量 或 向 量 交 处 的 值 
subplot(2,2,1),h= plot(xx, vnearest, 'T— ');set(h,'linewidth',2) | 
subplot(2,2,2),h= plot(xx,yYlinear, 'T— ');set(h,'linewidth',2); 

subplot(2,2,3),h= plot(xx, vspline, 'rT— ');set(h,'linewidth',2) 

subplot(2,2,4),h= plot(xx, ypPolyfit, 'rT— ');set(h,'linewidth',2) 


运行 程 厅 ; 输 出 图 形 如 图 5-8 所 示 。 
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【 例 5-5】 编制 分 段 二 次 插值 程序 , 即 在 每 一 个 插 伸 于 区 间 (xi-1,ZXi;) 上 用 抛物 线 插 
编程 如 下 : 


clc,clear,close all 

和 一 二 :3 ) 
WE 
二 工 一 0 与 25: 

£f0 = interpl (xx, yx, xxi) 
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fl1 = interpl (xx, yx, xxi, ']inear') 

f2 = interpl (zr, YE xx1, ‘cubic') 

£f3= interpl (xx, yx, KKEIL ' Spline') 

f4= interpl (xx, yx, xxi, 'nearest') 

f5 = lagrangel( xx, vx, xxi) 

plotlsr1i, Ef1, xx1l, £2, xx1l, 3, xxlr fd, xxi, ES, rT—— "Tinewidth',2) 


运行 程序 ,输出 图 形 如 图 5-9 所 示 。 


3 .3 


10 15 20 25 30 35 40 45 50 
图 5-9 分 段 二 次 插值 


其 中 ,三 次 样 条 插值 算法 的 插值 精度 较 高 ,所 构造 的 曲线 比较 光滑 。 因 此 ,在 许多 工 
程 设计 或 制造 业 中 ,例如 飞机 、 导 弹 等 外 形 设计 常 利用 该 插值 算法 进行 计算 . 

【 例 5-6】 某 观测 站 测 得 某 日 6:00 一 18:00 之 间 每 隔 2h 的 室内 外 温度 如 表 5-2 所 
示 , 用 样 条 插值 分 别 求 得 该 室内 外 6:30~-17:30 之 间 每 隔 2h 各 点 的 近似 温度 值 。 


表 5-2 温度 值 


时 间 4 | |» | | | | 
室外 温度 20.0 


设 时 间 变 量 为 一 行 向 量 , 温 度 :为 一 个 2 列 矩 阵 , 第 一 列 存储 室内 温度 ,第 二 列 存 
储 室外 温度 。 编 程 如 下 : 


clc,clear,close all 

n= 18, 秆 时 间 

t= 二 [18.0,20.2,22.0,25.0,30.0,29.3.,21.2; 竺 室内 温度 
15.6,18.3,22.1,26.4,33.6,31.6,20.0;]'; 和 室外 温度 

x1 二 和 :52:1171.9- 

vi= interpl(h,t,xi,'spline') 

plot(h,t,xi, vi) 


运行 程序 ,输出 图 形 如 图 5-10 所 示 。 


一 一 室内 扩 
一 一 室外 插值 


图 5-10 三 次 样 条 插值 


s.3 埃 尔 米 特 插值 


在 许多 实际 插值 问题 中 ,为 使 插值 图 数 能 更 好 地 和 原来 的 图 数 重 合 , 不 但 要 求 二 者 
在 节点 上 上 因数 值 相 等 ,而 且 还 要 求 相 切 ,对 应 的 导数 值 也 相等 ,甚至 要 求 高 阶 导 数 也 相 
等 。 这 类 插值 称 作 切 触 插值 ,或 埃 尔 米 特 (Hermite) 插 值 。 满 足 这 种 要 求 的 插值 多 项 式 
束 是 埃 尔 米 特 插 值 多 项 式 ， 

埃 尔 米 特 插值 多 项 式 互 Cz) 的 表达 式 为 


5 


H(zx) = Shi[Cxi— zx) 2aiyi— y1) yi] 
式 中 
Yi = Yr) y= yy (zi) 
步 长 以 及 系数 表达 式 为 
/zr zr\’ 1 
ns [1 二 — ) ee = Ti Ti 
2 7 
在 MATLAB 中 编程 实现 的 埃 尔 米 特 插值 法 函数 为 Hermite()， 
功能 : 求 已 知 数据 点 的 埃 尔 米 特 插值 多 项 式 。 
调用 格式 : 


herm = Hermite(x,y,dy, x0). 


其 中 ,herm 为 求 得 的 埃 尔 米 特 插值 多 项 式 或 在 ze 处 的 插值 ; x 为 数据 工 坐标 上 器 量 ; 
y 为 数据 y 坐标 回 量 ; dy 为 已 各 数据 点 的 导数 回 量 ; ze 为 插值 点 的 工 坐标 。 
在 MATLAB 中 实现 埃 尔 米 特 插值 的 代码 如 下 : 


function herm = Hermite(x,yvy, dy,x0) 

第 求 已 知 数据 点 的 埃 尔 米 特 插 值 多 项 式 
竺 文 坐标 向 旱 ;区 

和 了 坐标 向 量 : 了 
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贡 导数 向 量 : dy 
各 插值 点 的 到 坐标 : x0 
多 求 得 的 埃 尔 米 特 插值 多 项 式 或 在 x0 处 的 插值 : herm 


format long 竺 指定 数据 类 型 
syms t; 竺 变量 上 上 
funl = 0; 当初 值 


if(length(x) == LengthfYy)) 
if(length(vy) == length(dy)) 
nn = length(x); 
lse 
IeLturn. 
end 
[= 革 = 工 = 
Ieturn; 


end 


for 1=1:rm 
hn 三 1;。; 
= 二 1: 
for 了 三 工 :mnm 
if( JjJ~— = 1) 
BB hel a 2) 
a = at 1/(x(i)- x(j)); 


end 
funl = funl 十 hx ((x(i)—t)x (2xaxv(i)— dy(i)) + vy(1)); 
了 三 一 末了 |) 
if(nargin == 4) 
funl = subs(funl,'t',x0):; 
else 
funl vpa(funl,6); 
end 
end 
end 


herm = funl]l.; 


【 例 5-7】 埃 尔 米 特 插 值 法 应 用 实例 。 根 据 表 5-3 所 列 的 数据 点 求 出 其 埃 尔 米 特 插 
值 多 项 式 , 并 计算 当 z 一 1.44 时 的 y 值 。 


完 与 
y ]1. 4 
人 0.2 


在 MATLAB 命令 窗口 中 输入 以 下 命令 : 


clc,clear,close all 
format short 


hold off 

a 9 ee el © De ee 

2 Ws ps ph ee i ， 千 数 据 
1=[0.5,.0.4,0.3,0.25,0.2]; 先 耳 数 

f= Hermite(x, y,yY_1) 

f2 = Hermite(x,vy,y 1,1.44) 秆 计算 当 x=1.44 的 Vy 值 


format short 
subs(f,''t',1.44) 
二 L011 9: 
nt = size(t); 
for i=1:nt(1i,2) 
fvy(1,1) = double(subs(f,'t',t(1,21))); 
end 
plot(x,vy, 'linewidth',2) 
hold on 
grid on 
plotl(t, fy, 'r', ‘linewidth', 2) 
legend(' 原 好 数据 ', ' 持 值 ') 


运行 程 订 ,输出 结 末 如 下 : 


. AddAA44 * (BB.83333 tt 一 3.41667)}*(t 一 1.5)*2*x%{(t — 2.5) 2 关 七 


.444444 x (11.4667 xt — 30.0667)x(t — 1.5)*2x(t — 0.5)*^*2x(t 


一 1.0)^2x* (十 一 2.0)* 
0.5)^*2x(t — 2.0)^2 一 
一 1.0)^*2x#x (七 一 2.0)* 


— 7 了 .11111:x (4.08333 x* 士 — 9.46667)}x (t — 1.5)*2x(t — 2.5)*2x(t — 0.5)^2x( 人 七 一 
1.0)^2 十 16.0x( 主 一 2.5)^*2x(t — 0.5})*2x{t -— 1.0)^2x (证 一 2.0)^2x (0.3x 七 二 0.75) 


上 
0 
2 7.1111] x (4.06667 # 士 一 2.96667)}*(t — 1.5})}*2x tt 七 一 2.5)^2X( 七 一 
0 
2 
1 


f2 = 
90241077432693/76293945312500 
ans = 
1.1828078501257903437405853401997 


输出 插值 图 形 如 图 5-11 所 示 。 
由 图 5-11 可知, 采用 埃 尔 米 特质 值 , 持 值 精度 高 。 


1.40 -一 -一 


原始 数据 


0.5 1.0 1.5 2.0 2.5 


图 5-11 埃 尔 米 特 插值 
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5.4 二 维 数 据 插值 


二 维 数 据 插 但 是 构造 一 个 二 元 插值 羡 数 z 二 g(r,y) 去 近似 zx 三 f(x,y), 即 曲面 插 
但 。 如 测 山 高 水 深 , 面 出 更 为 精确 的 每 高 线 图 ,就 需要 先 插入 里 多 的 插值 点。 与 interpl 
类 似 ,指令 interp2 可 以 根据 数据 表 [x,y,zj, 用 各 种 不 同 的 算法 计算 Lzi,yij 各 点 上 的 银 
数 近 似 值 =; 。 

(1) zi 二 interp2(x,y,z,xi,yi):; 本 指令 格式 根据 数据 表 [Lx,y,zj, 用 双 线 性 差 值 算 
法 计算 坐标 平面 六 > 上 [xi,yij 各 点 的 二 元 肾 数 近似 值 二 ,这 里 工 可 以 是 一 行 回 量 , 它 与 
和 矩阵 = 的 各 列 癌 量 相 对 应 ; y 可 以 为 一 个 列 回 量 :, 它 与 = 的 各 行 回 量 相 对 应 。 对 于 [zi， 
yi 与 zi 加 的 对 应 关系 , 则 和 [zx,yj 与 xz 的 关系 相同 。 

(2) zi 一 interp2(z,xi,yi): 本 指令 格式 的 使 用 方法 与 zi 一 interp2(xy,yyvzyxiyyi) 格 式 
相同 ,只 是 插值 节点 不 同 , 此 时 用 节点 序号 z 一 1:mvy 一 1:m ,| mm,7 | 二 size(z)。 

《3) zi 一 interp2(z,xi,yi,method); 本 指令 格 却 的 调用 方法 与 上 述 指令 格式 相同 ， 
只 是 规定 在 格式 中 指定 具体 的 算法 。 在 MATLAB 中 ,method 有 如 下 四 种 形式 : 


Vg = interp2( …，METHOD) specifies alternate methods. The default 
is linear interpolation. Available methods are: 


‘nearest' — nearest neighbor interpolation 

‘inear' 一 bilinear interpolation 

'spline' 一 spline interpolation 

icubic' 一 bicubic interpolation as long as 七 he data Is 


uniformly spaced, otherwise the same as 'spline' 


第 用 的 几 种 method 方法 如 下 : linear( 双 线性 插值 ,默认 )、cubic( 双 三 次 插值 )、 
nearest( 最 近邻 区 域 插 值 )， 

【 例 S-8] 某 实 验 对 一 根 长 10m 的 钢轨 进行 热源 的 温度 传播 测试 。 用 xz 表示 测试 点 
0:2.5:10(m) ,用 表示 测试 时 间 0:30:60(s) ,用工 表 示 测 试 所 得 各 点 的 温度 。 

用 双 线 性 插值 表示 在 lmin 内 每 隔 20s、 钢 轨 每 阳 lm 处 的 温度 TT;。 编 程 如 下 : 


clc,clear,close all 
二 三 本: 上 
h=[0:30:601]'; 
T=|[95,14,0,0,0; 
388, 48,32,12.,6; 
67,64,54,48,41 |]; 
subplot(121 ), 
mesh(x, PT) : 
xlabel( 'x') ;ylabel('h'),zlabel( 'z') 
XIL= 一 [Oo:10|]，; 
hi=[0:2:60]'; 
Ti= interp2 (x,h,T,x1, hz):; 
subplot(122), 
mesh(xi, hi, Ti) 
xlabel( 'x') ;ylabel('h'),zlabel( 'z') 


运行 程序 ,输出 图 形 如 图 5-12 所 示 。 


i 和 
i 人 be 
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A BD ~ 
, Ne 所 AN ~ 可 
60 ™ \ AN - J | 
40、 10 10 
20 和 
万 > 
0 0 2 
(a) 原始 数据 图 形 (b) 插值 结果 图 


图 5-12 双 线 性 质 值 钢轨 温度 三 维 图 


对 于 插值 极点 为 散乱 节点 而 言 ,已 知 个 节点 Crisyi5zi) Gi 二 1,2,3,… sn) , 求 点 (x1， 
yi) (不 是 节点 (xi ,wi)) 处 的 插值 z;。 
cz = griddatal(x,vy,z,cx,cy, 'method') 
这 里 Xz,y,z 部 是 nn 维 向 量 , 表 明 数 据点 的 村 坐标 、 纵 坐标 和 竖 坐 标 ; 回 量 cxycy 是 给 
定 的 网 格 点 的 权 坐 标 和 纵 坐 标 。 指 令 cz 二 griddata(x,y,zZscx,cy,'method') 返 回 在 网 格 
(csscy) 处 的 函数 值 。cs 和 cs 应 是 方向 不 同 的 向 量 , 即 一 个 是 行 向 量 ,一 个 是 列 向 量 。 
在 MATLAB 中 ,method 有 如 下 五 种 形式 : 


oriddatal( … ，METHOD) where METHOD is one of 


nearest' 一 Nearest neighbor interpolation 
‘inear' — Linear interpolation (default) 
natural' 一 Natural neighbor interpolation 
cubic' — Cubic interpolation (2D only) 

‘v4d' — MATLAB 4 griddata method (2D only) 


常用 的 几 种 method 方法 如 下 : lnear( 双 线性 插值 ,默认 )、cubic( 双 三 次 捕 值 )、 


nearest( 最 近邻 区 坡 岳 值 ) 。 
【 例 S-9〗 在 其 海域 测 得 : 点 (zyy) 处 的 水 座 =, 在 矩形 区 域 (75,200) X( 一 50， 


150) 内 画 出 海底 曲面 图 形 。 数据 如 表 5-4 所 示 。 
表 5-4 海域 地 形 


是 105 
Y 86 
pA 一 8 
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118 
了 一 34 
4 一 入 


根据 数据 调用 griddata() 对 该 海域 地 形 进 行 差 值 分 析 。 编 程 如 下 : 


clc,clear,close all 

x= [129,140,103.5,88,185.5,195,105,158,108,77,81,162,162,118]: 
Y= LT7.5;142,23,.147,.23,138,.86, ~ 6.5, = Bl1,3,517, ~ 66,.84, = 34|]; 
z=| 一 4. —B,.—6,—-8,-6.—8,.—8,-93,.-9,.—8,—B.—9.—-4,—93]; 
CX= 75:5:200; 

cy= — 70:(150+70)/25:150; 

[CX, CY] = meshgrid(cx,cv); 

cz= griddatalXx,yvy,zZ,cx,cyv, ' cubic'); 

CZ= griddatal(lx, vy,zZ,CX, CY, 'cubic'); 

figure(1), 

mesh( CX, CY, CZ).: 

figure(2), 

contour3(CX, CY, CZ,16) 


运行 程序 ,输出 图 形 如 图 5-13 和 图 5-14 所 示 。 


下 


图 5-13 ”空间 曲面 图 


党 Cs 一 一 = 


图 5-14 空间 等 高 线 图 


在 500m 间距 正方 形 网 格 系统 上 测 得 海 展 诛 度 (m) ,绘制 其 海 诬 诛 度 图 。 编 程 如 下 : 


秆 第 

clc,clear,close all 

X00.5:4-; 

y=0:0.5:6; 
z=[100,39,100,99,100,99,99,99,100; 
100,99,99,99,100,99,100,99,99.; 
99,99,98,98,100,939,100,100,100; 
100,98,97,97,99,100,100,100,99; 
101,100,98,98,100,102,103,100,100; 
102,103,101,100,102,106,104,101,100; 
99,102,100,100,102,106,104,101,100; 
97,99,100,100,102,105,103,101,100; 
100,102,103,101,102,103,102,100,99; 
100,102,103,102,101,101,100,99,99.; 
100,100,101,101,100,100,100,99,99; 
100,100,100,100,100,99,99,99,99; 
100,100,100,99,99,100,99,100,99 |]; 
mesh(xXx, y,zZ) 

xlabel( 'X(km)') 

vlabel('Y(km)') 

zlabel( ' 海 底 深 度 (m)') 

title( ' 海 底 深 度 图 ') 


运行 程序 ,输出 图 形 如 图 5-15 所 示 。 


海 撒 这 度 图 
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图 5-15 海底 深度 图 
如 图 5-15 所 示 , 对 其 进行 双 线 性 插值 。 编 程 如 下 : 
xi= linspace(0,4,30):. 


yi= linspace(0,6,40); 
[xxi, yyi|] = meshgrid(xi, yi):; 


1 


r= ----- MATLAB 科 学 计算 


zzi= interp2 (x,y,z,xxi, yyi, 'linear' ); 
mesh( xxi, yyi, zzi) 

title( ' 线 性 插值 ') 

hold on 

[xx, YY] = meshgrid(x,v); 

plot3(xx, yy,z+0.1,'ro'); 

hold off 


运行 程序 ,输出 图 形 如 图 5-16 所 示 。 


线性 岳 值 


采用 双 比 性 插值 ,编程 如 下 : 


zzZi= interp2(x,y,z,xxi, yyi, bilinear').; 
mesh(xxi, vyi, zzi) 

title(' 双 线性 插值 ') 

hold on 

[xx YY] = meshgrid(x, 7) ; 

plot3(xx, yy,z +0.1,'ro'). 

hold off 


运行 程序 ,输出 图 形 如 图 5-17 所 示 。 
采用 立方 插值 ,编程 如 下 : 


zzi= interp2(x,y,z, xxi,yyi, ICUDICT) ， 
mesh(xxi, yyi, zzi) 

title( ' 立 方 播 值 ') 

hold on 

[xx, YY] = meshgrid(x, yY); 

plot3{(xx, vy,z+0.1,'ro').; 

hold off 


双 线 性 插值 
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图 5-17 双 线 性 插值 


运行 程序 ,输出 图 形 如 图 5-18 所 示 。 : 
立方 插值 
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zzi= interp2 (x,y,z,xxi, YYI "bicubic'); 
mesh(xxi, vyi, zzi) 
title(' 双 立方 插值 ') 
hold on 
[xx, YYy] = meshgrid(x, y); 
plot3(xr, vyr2+0.1,'ro'); 
hold off 


运行 程序 ,输出 图 形 如 图 5-19 所 示 。 
采用 最 近邻 持 值 方法 ,编程 如 下 : 
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' zzi= interp2(x,y,Zz,xXxxi,vyi, 'Nnearest'); 
mesh(xxi, yyi, zzi) 

title(' 最 近邻 插值 ') 

| hold on 

| [xx, YY] = meshgrid(x, y); 

| plot3{(xx, vy,z+0.1,'ro').; 
hold off 


运行 程序 ,输出 图 形 如 图 5-20 所 示 。 
最 近邻 插值 
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图 5-20 最 近邻 插值 


绘制 该 区 域 的 伪 彩 色 图 ,编程 如 下 : 


close all 

zzi= jinterp2 (x,y,z,xxi,yvyi, bicubic'); 
pecolor(zxxi, yyi, zzi) 

shading interp 


下 


( 


4— 


hold on 

contour(xxi, yyi, zzi, 15, 'k') 
colormap(cool) 针 着 色 系 
colorbar('vert') 和 产生 竖 直 颜 色 条 
hold off 

title( ' 海 底 深 度 等 值 线 图 ') 


运行 程序 ,输出 图 形 如 图 5-21 所 示 。 
海底 深度 等 值 线 图 


0: DS Lo ls 2 25 30 35 40 
图 5-21 海底 深度 伪 彩 色 图 


5.5 回归 分 析 


回归 分 析 是 确定 两 种 或 两 种 以 上 变数 间 相 互 依赖 的 定量 关系 的 一 种 统计 分 析 方 
法 。 运 用 十 分 广泛 ,回归 分 析 按 照 涉 及 的 日 变量 的 多 少 , 可 分 为 一 元 回归 分 析 和 多 元 
回归 分 析 ; 按照 日 变量 和 因 变 量 之 间 的 关系 类 型 ,可 分 为 线性 回归 分 析 和 非 线 性 回归 
分 析 。 

如 有 果 在 回归 分 析 中 ,只 包括 一 个 自 变量 和 一 个 因 变 量 , 且 二 者 的 关系 可 用 一 条 直线 
近似 表示 ,这 种 回归 分 析 称 为 一 元 线性 回归 分 析 。 

如 果 回 归 分 析 中 包括 两 个 或 两 个 以 上 的 目 变 量 , 且 因 变 量 和 日 变量 之 间 是 线性 关 
系 , 则 称 为 多 元 线性 回归 分 析 。 

第 用 的 回归 模型 统计 量 : 

(1) 总 仿 差 平方 和 


SS1 一 3 (yi 一 了 
其 自由 度 为 fr 二 n 一 1。 i=1 
(2) 回归 平方 和 
SSR = D9- 
其 自由 度 为 fk 二 1。 一 


“6 


[二 
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(3) 残 差 平方 和 


SSE = PD 一 次) 


;二 1 
其 自由 度 为 fe 一 n 一 2。 

它们 之 间 有 关系 : SST 二 SSR 十 SSE。 

对 于 回归 方程 分 析 , 下 面 结合 实例 进行 相关 分 析 。 

MATLAB 拟 合 工具 箱 提 供 了 regressQ 〇 函数 供用 户 使 用 ,具体 调用 如 下 : 

(1) B = 二 regress(Y,X)。 六 是 一 个 n-by-p 窍 阵 ,YY 是 一 个 nrby1 状 态 啊 应 矩阵; 返 
回回 归 和 系数 B, 线 性 模型 Y 二 和 关 xB，。 

(2) [|B,BINT | 二 regress(Y,XX)。 关 是 一 个 n-by-p 算 阵 ,YY 是 一 个 n-by-1 状态 啊 应 
矩阵 ; 返回 BINT 为 B 的 95% 的 置信 和 区间。 

(3) |B,BINT,R | 二 regress(Y ,入 )。 大 是 一 个 nrbyp 算 阵 ,Y 是 一 个 n-by-1 状态 啊 
应 矩阵 ; 返回 的 RR 为 相应 的 留 数 。 

(4) | B,BINT,R,RINT | = 二 regress(Y,XX)。 六 是 一 个 n-by-p 和 窍 阵 ,YY 是 一 个 n-by-1 
状态 啊 应 矩阵 ; 返回 的 RINT 和 矩阵 用 来 诊断 寞 弟 值 ,一 般 包 含 0 表示 不 弄 兽 。 

(5) [|B,BINT,R,RINT,STATS| 一 regress(Y ,X) 。 大 是 一 个 mbyrp 和 矩阵 ,YY 是 一 
个 n-by-1 状态 啊 应 矩阵 ; 返回 的 STATS 包含 尺 方 统计 量 、 下 统计 量 等 。 

(6) |… | 一 regress(Y,X, ALPHA)。 古 是 一 个 nrby-p 矩阵,Y 是 一 个 nrby-l 状态 
啊 应 和 抢 阵 ; 使 用 100 x* (1 一 alpha) % 定 义 置信 区 间 。 

【 例 sS-103 为 了 了 了解 百货 商店 销售 额 工 与 流通 有 率 y 之 间 的 关系 ,收集 了 9 个 商店 
的 有 关 数 据 ,如 表 5-5 所 示 。 试 建立 流通 费 率 y 与 销售 额 工 的 回归 方程 。 

表 5-5 销售 额 与 流通 费 率 数据 
样本 点 销售 额 x/ 万 元 流通 费 率 y 


|e || 
| ee | 
EN | EN | Rn 
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,8 

3. 

1 10. 5 3.1] 
了 19. 5 2.4 
9 9 9 2.2 


自 先 绘 制 散 点 图 以 十 观 地 选择 拟 合 曲 线 。 编 程 如 下 : 


clc,clear,close all 

m=|[1 5 A 5 7 5 .10 5 .193.5.16 57.195.22.37.29 53|: 
"a .es ee ee 
plot(x,y,'— 0o') 

axis tight 


grid on 


输出 拟 合 图 形 如 图 5-22 所 示 。 
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图 5-22 散 点 赎 
由 图 5-22 初步 判断 应 以 具 肾 数 曲 线 为 拟 合 日 标 ; 即 选择 非 线 性 回归 模型 。 目标 聘 


数 为 
y=ar" (5 一 0) 


其 线性 化 变换 公式 为 
v= lny, zz 一 1nz 
线性 函数 为 
v= na bu 


针线 性 化 变 撞 

u= log(x)'; 

v= log(y)'; 

委 构造 资本 论 观测 值 矩 阵 

m= [ones(length(u)}),1) ul]; 

alpha = 0.05; 

s 线性 回归 计算 

[b, bint,r,rint,states| = regress(v, mu,alpha) 


运行 程序 ,输出 结 采 如 下 : 


上 三 
.1421 
— 0.4259 
bint = 
2.0614 2.2229 
—0.4583 一 0.3934 
Ir 二 
— 0.0235 
0.0671 
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一 0.0030 
一 0.0093 
一 0.0404 
一 0.0319 
一 0.0016 
0.0168 
0.0257 
rint = 
一 0.0700 0.0230 
0. 0202 0.1140 
一 0.0873 0.0813 
一 0.0939 0.0754 
— 0.1154 0.0347 
一 0.1095 0.0457 
一 0.0837 0.0805 
一 0.0621 0.0958 
一 0.0493 0. 1007 
states = 
0.9928 963.5572 0.0000 0.0012 


p 一 [ 2. 1421; 一 0. 4259] 表 示 线 性 回归 模型 v= 二 lna 十 bu 中 :lna 一 2. 1421,0 一 

一 0. 4259, 即 拟 合 的 线性 回归 模型 为 
y = 2.1421— 0.4259x 

bint 一 [2. 0614,2. 2228; 一 0. 4583, 一 0. 3934] 表 示 拟 合 系数 lna 和 5 的 100(1 一 
alpha) % 的 置信 区 间 分 别 为 [2.0614,2. 2228] 和 [一 0. 4583 ,一 0. 3934]; r 一 [一 0. 0235 
0.0671 一 0.0030 一 0.0093 一 0.0404 一 0.0319 一 0.0016 0.0168 0.0257] 表 
示 模 型 拟 合 残 差 回 量 ; rint 表示 模型 拟 合 残 差 的 100(1-alpha) % 的 置信 和 区间。 
states 一 [0. 9928 963.5572 0. 0000 0. 0012] 表 示 : 


办 ”一 Se 一 0.9928 


方差 分 析 的 下 统计 量 
ss SSR 


"TT SST/fe ™ SSE/(—2) Yo 


方差 分 析 的 显著 性 概率 
= PC(F(l 7 一 2 > Fa:0 
模型 方差 的 估计 值 


a 一 Ee 0. 0012 
天 一 此 


刻 线性 化 变换 求 非 线 性 回归 方程 ,编程 如 下 : 
秆 遂 线 性 化 变 撞 


及 = exp(b(1)) 
B= b(2) 


运行 程序 :输出 结 采 如 下 : 


即 韭 线性 回归 方程 为 
vo BT 


本 章 小 结 


基于 MATLAB 的 插值 拟 合 操作 ,主要 针对 一 维 、 二 维 、 三 维 数 据点 进行 插值 拟 合 ， 


使 得 插值 拟 合 结 东 更 加 通 近 于 原始 数据 。 负 用 的 插值 方法 有 最 近邻 持 值 、 样 条 质 值 、 立 


方 插值 等 。 一 般 情 议 下 : 贡 采 用 立方 捕 值 对 原始 数据 进行 插值 拟 合 。 


他 
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解决 数据 拟 合 问题 最 重要 的 方法 便 是 最 小 二 乘法 和 回归 分 析 。 
在 科学 实验 ,统计 全 究 以 及 一 切 日 第 应 用 中 ,人 们 弟弟 需要 从 一 组 测 
定 的 数据 去 求 得 和 目 变 量 x 和 因 变 量 > 的 一 个 近似 解 表 达 式 y 一 Cr) ,这 
就 是 由 给 定 的 NN 个 点 (ziyyi) (i 二 0;1s…* ,mm) 求 数据 拟 合 的 问题 。 本 章 
基于 最 小 二 乘法 基本 原理 ,讲解 了 多 项 式 拟 合 、 非 线性 拟 合 等 拟 合 问题 。 

学 习 目 标 : 

。 向 握 最 小 二 乘 基 本 原理 和 数据 拟 合 基本 方法 ; 

。 掌握 MATLAB 解决 数据 拟 合 问题 ; 

。 运用 数据 拟 合 解决 具体 工程 问题 。 


6.1 基数 还 近 


在 区 间 [Lae ,oj 上 已 知 一 连续 上 力 数 f(x) ,如 果 f(z) 的 表达 式 太 过 复 
们 不 利于 用 计算 机 来 进行 计算 ,自然而然 地 想到 用 一 简单 明 数 去 近似 
(ZX) ,这 就 是 图 数 通 近 问 题 。 

如 果 FCz) 的 表达 式 未 知 , 只 知道 描述 f(x) 的 一 条 曲线 ,这 就 是 曲 
线 拟 合 问题 。 

与 搬 信 问 题 不 同 的 是 , 通 近 与 拟 合 并 不 要 求 通 近 果 数 在 已 知 点 上 
的 值 一 定 得 等 于 原 困 数 的 图 数值 ,而 是 按照 革 种 标准 使 得 两 者 的 差 值 
达到 最 小 。 


6.1.1 切 比 雪夫 通 近 


当 一 个 连续 困 数 定义 在 区 间 [L 一 1,1j] 上 时 , 它 可 以 展开 成 切 比 雪 
夫 (Chebyshev) 级 数 , 妈 


Fo= ST 
| 
式 中 
be n= 
. 了 
TnCz)Tnmtz)dz _ x ,omzA0 
a v1l— zr’ | 2 


| 区。 1 一 1 一 


在 实际 应 用 中 :可 根据 所 需 的 精度 来 截取 有 限 项 效 。 切 比 委 去 级 数 中 的 系数 由 下 式 


六 -Le 


Ee 过 ' TF, 
z We 
在 MATLAB 中 编程 实现 的 切 比 雪夫 通 近 法 果 数 为 Chebyshev() 。 
功能 : 用 切 比 雪夫 多 项 式 通 近 已 知 果 数 。 
调用 格式 : 


fun = Chebyshev(y,m,x0) 


其 中 ,fun 为 切 比 雪夫 通 近 多 项 式 在 re 处 通 近 值 ; 人 为 已 知 困 数 ; mm 为 通 近 已 知 上 时 


数 有 所定 项 数 ; xo 为 通 近 点 的 工 坐 标 。 


在 MATLAB 中 实现 切 比 雪夫 通 近 的 代码 如 下 : 


function fun = Chebyshev(Yy my x0 ) 

秆 fun: 切 比 雪夫 逼近 多 项 式 在 x0 处 逼近 值 
秆 用 声 比 雪夫 多 项 式 逼 近 已 知 函 数 了 

和 逼近 已 知 函 数 所 需 项 数 : nm 

币 逼 近 点 的 工 坐 标 : x0 

format short 


svms t; 
Tbh(1l:m+ 1) = t; 
Th(1) = 1; 
Th(2}) 三 七 ; 


Che(l:m+1)} = 0.0; 
Che(1) = int(subs(v,findsym(svym(vy)) ,svm('t')) * Th(1)/sgqrt(1 —-t"*2),t, -1,1)/pi; 
Che(2) = 2 +#% int(subs(y,findsym(sym(vy)), sym('t')) * Th(2)}/sqrt(1—t"*2),t,— 1,1)/pi; 
fun = Che(1) + Che(2) x* +t; 
fori=3:m+1 

Th(1} = 2xtx Th(i—-1)-— Th(1i— 2}); 


Che(i) = 2*x int(subs(vy,findsym(sym(v)),svym('t')) * Th(i)/sgqrt(1 -tt"*2),t, -1,1)/2; 


fun = fun + Che(i) * Tb(1); 
fun = vpal(lfun, 6); 
if(i==m+1) 
if{(nargin == 3) 
fun = subs(fun,'t',x0); 
企业 总 宕 
fun = vpa(fun,6); 


二 Tid| 
end 
Tid 
【 例 6-1】 切 比 雪 夫 盘 近 应 用 实例 。 用 切 比 雪夫 公式 (5 项 多 项 式 ) 到 近 函数 > 


并 求 当 z 一 2 时 的 也 数值 。 


去 国 宇 
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在 MATLAB 命令 窗口 中 输入 以 下 命令 : 


clce,clear, close all 
format short 
hold off 
EL = Chebyshev('1/(2— x)',5) 和 7 了 7 阶 多 项 式 
£f2 = Chebyshev('1/(2 — x)',5,2) 
t 三 0:0.1:1-: 
nt = size(lt):; 
for i=1:nt(1,2) 
f3(1,i) = double(subs(fl1,'t',t(1,i))); 针 输 出 结果 


三 0::0.1:1- 

f4 = 1./(2— x); 

plot{(t, £4, ‘linewidth',2) 

hold on 

plot(t, £3, 'ro—— ','l]inewidth’',2) 
grid on 

axis tight 

legend(' 原 始 灼 据 ', ' 拟 合 ') 


运行 程序 ,输出 结 采 如 下 : 


fl = 

0.277013x 七 + 0.0647768 #*tx(2.0xte2 — 1.0) — 0.00501051 xtx (2.0xt#*(t — 2.0#xt 
x (2.0xte^2 — 1.0)) + 2.0xte^2 — 1.0) — 0.0186995xtx(t — 2.0xtx (2.0xt"^2 — 1. 
0)) + 0.24175x 七 ^2 + 0.456475 


f2 = 
4.8287874842470433420227315934881 


运行 程序 ,输出 图 形 如 图 6-1 所 示 。 


| 
二 。 

| 

| 

| 
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0.1 02 03 04 05 0.6 07 0.8 09 1.0 
图 6-1 切 比 雪夫 通 近 结果 


采用 切 比 雪夫 还 近 纺 和 采 比 较 接 近 准 确 什 。 


在 数学 Rd addled Ne ae ee 的 一 类 因数 中 寻找 东 个 


误差 。 i 


近似 表示 了 而 产生 的 


当 被 瘟 近 晴 数 为 周期 限 数 时 ,用 代数 多 项 式 来 瘟 近 效率 不 高 ,而 且 误 差 也 较 大 ,这 时 


用 三 角 多 项 了 式 来 通 近 是 较 好 的 选择 。 


三 角 多 项 陈 通 近 即 传 里 叶 通 近 :, 任 一 周期 图 数 午 可 以 展开 为 傅 里 叶 级 数 ,通过 选取 


有 限 的 展开 项 数 , 就 可 以 达到 所 需 精 度 的 瘟 近 效 末 。 


下 面 介 绍 连续 周期 消 数 和 离散 周期 清 数 的 传 里 叶 瘟 近 的 具体 做 法 。 


1. 连续 周期 函数 的 傅 里 时 逼近 


对 于 连续 周期 梁 数 ,只 要 计算 出 其 传 里 叶 展 开 系 数 即 加， 


在 MATLAB 中 编程 实现 的 连续 周期 图 数 的 传 里 叶 通 近 法 图 数 为 FZZT() 。 


功能 : 用 全 里 叶 级 数 通 近 已 知 的 连续 周 期 四 数 。 
调用 格式 : 


[AO0,A,B| = FZZT( func, T,n) 


其 中 ,func 为 已 知 图 数 ; 了 为 已 知 图 数 的 周期 ; nn 为 展开 的 
数 项 ; A 为 展开 后 的 余弦 项 系数 ; B 为 展开 后 的 正弦 项 系数 。 
在 MATLAB 中 实现 连续 周期 困 数 的 傅 里 叶 通 近 的 代码 如 下 : 


function [A0,A,B] = FZZT(func,T, n) 

竺 用 傅 里 叶 级 数 逼 近 连 续 周 期 函数 

向 func: 已 知 函 数 

和 T: 已 知 函 数 的 周期 

千 n: 展开 的 次 装 

千 A0: 展开 后 的 常数 项 

千 A;: 展开 后 的 余 萎 项 系数 

和 B: 展开 后 的 正 强 项 系数 

svms tt; 

func = subs(sym(func), findsym(sym(func)),sym('t')):; 

AD = int(svym(func),t, — T/2,T/2)/T:; 

for(k=1:n) 
A(k) = int(func x cos(2 x pi x Ex t/T), t, — T/2,T/2) * 2/T; 
A(k) = vpa(A(k).,4); 
B(k) = int(func # sin(2 x pi x kx t/T), t, — T/2,T/2) < 2/T; 
B(k) = vpa(B(k).,4); 

End 


【 例 6-2】 连续 周期 郊 数 全 里 叶 人 过 近 应 用 和 实例。 用 传 里 叶 级 数 ( 取 5 项 ) 逼 近 盯 数 


y 二 工 , 输 出 系数 值 ，。 
在 MATLAB 命令 窗口 中 输入 以 下 命令 : 


次 数 ; A0 为 展开 后 的 第 
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clc,clear,close all 
format short 

hold off 

[a b,c] = FZZT( x", pi, 4d) 
c= double(c); 

TX 三 DD:0.1:1- 


了 一 xXx; 


YL = cc(1) 关 sin(x) + cc(2) % sin(2 x) 十 安 ( 卫 ) x sin(33% x) + cc(4) % sin(4 3 xXx); 


plot(x,vy,'b', 'linewidth',2) 

hold on 

plot(x, yl, 'ro—— ','linewidth',2) 
grid on 

axlis tight 

legend( ' 原 始 数 据 '，' 逼 近 ') 


结 来 表明 ,如 来 取 5 项 通 近 图 数 y 二 +, 有 下 面 的 式 于 : 


[ 0, 0, 0, 0] 


[ i.0, -0.5, 0.33333333333303016843274235725403, 


输出 图 形 如 图 6-2 所 示 。 


1.0 
0.9 --- 了 一 一 慰 始 数据 
0.8 ' 

0.71 L 

0.6 r 

0.5 | 


= 人 D0. 25| 


| f= = = 


0 ol 02 03 04 05 06 07 08 09 1.0 
图 6-2 连续 周期 困 数 傅 里 叶 通 近 


由 于 函数 y 王 + 是 奇 靖 数 , 因 此 展开 后 的 余弦 项 系数 都 为 0。 


2. 离散 周期 数据 的 侍 里 叶 通 近 


对 于 离散 周期 的 数据 拟 合 , 只 要 计算 出 其 离散 传 里 叶 展 开 系 数 即 可 。 其 展开 公 


#1 


YY 一 >》, Cie™” 


是 一 总 

式 中 

Ck 一 人 (k= 0,1, ,nO— 1) 
在 MATLAB 中 编程 实现 的 离散 周期 数据 总 傅 里 时 通 近 法 晒 数 为 DFFE 。 
功能 : 离散 周期 数据 点 的 傅 里 时 通 近 。 
调用 格式 : 
c = DEEF (f,N) 
其 中 ,ff 为 已 和 若 离 散 数 据点 ; NN 为 离散 数据 点 的 个 数 ; ec 为 离散 倩 里 叶 通 近 系 数 。 
在 MATLAB 中 实现 离散 周期 蚂 数 的 傅 里 叶 通 近 的 代码 如 下 : 


function ce = DFF(f£,N) 
委 离 散 周 期 数据 点 的 傅 里 叶 逼 近 
竺 已 知 离 散 数 据点 : 
竺 离散 数据 点 的 个 数 :N 
先 逼 近 了 系数 : c 
c(l1:N) = 0; 
for(m= 1:N) 
for(n=1:N) 
clm) =c(m) +f{(n) x exp(— ixmxnx 2 pi/N); 
end 
c(m) = c(m)/N:; 
end 


【 例 6-3】 离散 传 里 叶 通 近 应 用 实例 。 对 下 列 数据 点 进行 离散 傅 里 叶 变换 。 其 数据 
如 表 6-1 所 示 。 


表 6-1 数据 表 


在 MATLAB 命令 窗口 中 输入 以 下 命令 : 


clc,clear,close all 

format short 

warning off 

hold ef 

XX 二 1:06; 

Y=[0.85.0.1.0.15. ~—0.8,.—0.1,.—0.4|:; 

c= 一 DFF(Yy,6) 

YL = c(1). x exp(— ixx)+c(2). x exp(— ix2xxXx)+c(3). x exp(— ix3xx)+c(4d4). * 
exp( — ix 4%)+c(5)}). x exp(— ix 5x)+c(6). x exp(— ix6x xX); 

plot(x,y, 'b', 'linewidth',2) 
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hold on 

plot(x,vl, 'ro—— ','linewidth',2) 
grid on 

axis tight 

legend(' 原 始 数 据 ', 逼近 ') 


运行 程序 ,输出 结果 如 下 : 


二 
Columns 1 through 3 

一 0.0292 + 0.26701 0.0458 十 0.00721 0.3333 十 D.00001 
Columns 4 through 6 

0.0458 一 0.00721 -0.0292 一 0.26701 0.0333 十 0.00001 


运行 程序 ,输出 图 形 如 图 6-3 所 示 。 
| : | \ 0 原始 数据 
-~ -c- - 遂 近 


Fo 5 30 25 30 5 40 45 0 $35 wD 
图 6-3 离散 傅 里 叶 通 近 
对 于 实数 序列 来 说 ,其 离散 傅 里 叶 变 换 的 结果 一 般 是 复数 序列 。 经 过 离散 傅 里 叶 变 
。 换 , 函 数 逼 近 效果 较 好 。 


6.2 最 小 二 乘 拟 合 


由 于 测量 数据 往往 不 可 避 例 地 市 有 测试 误差 ,而 插值 多 项 陈 又 通过 所 有 的 点 (zi， 
yi), 这样 就 使 插值 多项式 保 留 了 这些 误差 ,从 而 影 响 通 近 精度 ,使 得 插值 歼 果 不 理想 。 
’ 因此 , 寻求 已 知 玉 数 的 一 个 通 近 函数 y= 二 w(x), 使 得 副 近 卫 数 从 总 体 与 已 知 函 数 的 
: 仿 差 按 菏 种 方法 度量 能 达到 最 小 ,而 义 不 一 定 过 全 部 的 点 (zi;;y;), 则 需要 最 小 二 乘法 曲 
\ 线 拟 合 法 。 
| 数据 拟 谷 的 具体 做 法 是 : 对 给 定 的 数据 Cri yD (i 二 0,1 一 ,12) ,在 取 定 的 明 数 类 
中 , 求 p(xr) EB, 使 误差 7 二 pCri) 一 yi(i 二 0,1 7) 的 平方 和 最 小 , 即 


DE = [ec 一 yi 了 |， 


从 几何 意义 上 讲 , 即 寻求 与 给 定点 (ziyyi) (i 一 0;,1,………,m) 的 距离 平方 和 为 最 小 的 曲 
线 y 二 p(r)。 了 畏 数 PCz) 称 为 拟 合 上 因数 或 最 小 二 乘 解 , 求 拟 合 盟 数 p(xz) 的 方法 称 为 曲线 下 
拟 合 的 最 小 二 乘法 。 拟 

在 曲线 拟 合 中 , 晒 数 类 风 可 有 不 同 的 选取 方法 。 

【 例 6-4】 某 观 测 站 测 得 某 日 6:00 一 18:00 之 间 每 隔 2h 的 室内 外 温度 如 表 6-2 所 
示 :用 样 条 插值 分 别 求 得 该 室内 外 6:30 一 17:30 之 则 每 隅 2h 各 点 的 近似 温度 值 。 


表 6-2 温度 值 


设 时 间 变 量 hh 为 一 行 辐 量 ,温度 t 为 一 个 2 列 和 矩阵 ,第 一 列 存储 室内 温度 ,此 二 列 存 
储 室 外 温度 。 编 程 如 下 : 


clc,clear,close all 


h=6:2:18; 和 时 间 

t=1L180,20.2.22. .0.250, 0 29 3,.21.2; 竺 室内 温度 
15. ;18.3,.22.1.26.4.33.6,.31.6.20.0;1"; 竺 室外 温度 

plot(h,t,''ro—— ") 

grid on 


xlabel( 'h') 
vlabel( 't') 


运行 程序 :输出 结 采 如 图 6-4 所 示 。 


| | 
| | 
| 和 | i 


图 6-4 散 点 图 


采用 MATLAB 图 形 拟 合 工具 箱 进 行 曲线 最 小 二 乘 拟 合 ,如 图 6-5 和 图 6-6 所 示 。 

MATLAB 工具 箱 自 动 生 成 拟 合 曲线 ,如 图 6-7 所 示 。 

一 般 地 ,为 了 较 好 地 分 析 数 据 服 从 哪 种 分 布 以 及 用 什么 拟 合 方法 较 合 适 , MATLAB 
拟 合 工具 箱 能 够 较 好 地 提供 拟 合 方法 。 
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对 齐 布 局 网 格 (LI) 


童 看 布局 网 格 (中 
智能 对 齐 和 分 布 [5) 
对 齐 分 布 工具 (U),.. 
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剧变 (R) 
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图 6-5 激活 拟 合 工具 箱 图 6-6 ”cubic 插值 拟 合 
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图 6-7 拟 合 原型 图 


6.3 多 项 式 拟 合 


假设 给 定数 据点 (ry = Dy » 171 ) :» 为 所 有 次 数 不 超过 n(n 三 4) 的 多 项 式 构 
成 的 函数 类 , 现 求 p, (xz) 二 Se EE $$, 使 得 


I 全 [pr Cxi) — yi = 2 (Darr! — Yi ) | 。 
上 式 称 为 多 项 式 拟 合 , 满 足 上 式 的 p(x) 称 为 最 小 二 乘 拟 合 多 项 式 。 特 别 地 , 当 nn 一 
1 时 ,上 式 称 为 线性 拟 合 或 直线 拟 合 。 
和 2 ( Sarr’ 和 yi) 
关于 ao ai，……anr 的 线性 方程 组 ,用 给 阵 表示 为 


| es sag I | 
m1 产 二 > 元 > Ys 
i 二 0 i 二 0 | i 二 0 
lito 
A i 7 yr 人 村 | 。 Ys 
ii 一笑 i 二 0 ti 一 人 = 一 站 


3 Ei _ a 重重 各 | Ei TVs 


上 式 称 为 正规 方程 组 或 法 方程 组 。 

MATLAB 工具 箱 中 提供 了 最 小 二 乘 拟 合 范 数 polyfit(), 具 体 调用 格式 如 下 : 

(1) P 二 polyfit(X,.Y.,N)。 其 中 ,X 为 输入 的 向 量 x,.Y 为 得 到 的 图 数值 ,N 表示 拟 
合 的 最 高 次 数 , 返 回 的 书 值 为 拟 合 的 多 项 式 PC(1)*Xe^N 十 PC2)*X^ CN 一 1) 十 … 十 
PCN) * 久 十 P(N 十 1)。 

(2) LP,Sj] 二 polyfit(X,Y,N)。 其 中 , 针 为 输入 的 同 量 x ,Y 为 得 到 的 也 数值 ,N 表 
示 拟 合 的 最 高 次 数 , 返 回 的 了 值 为 拟 合 的 多 项 式 P(1)x* XX^N 和 十 PC(2)x* XX 人 ^N 一 1]) 十 … 
二 PCN)x*X 和 十 P(N 十 1),S 为 由 纺 德 过 算 阵 的 QR 分 解 的 下 分 量 。 

(3) [P,S,MU] 二 polyfit(X,Y,N)。 其 中 ,外 为 输入 的 向 量 x,Y 为 得 到 的 明 数 值 ,N 
表示 拟 合 的 最 高 次 数 , 返 回 的 己 值 为 拟 合 的 和 多项式 P(1)x* 和 XX 人 ^N 和 十 P(2)x*X^N 一 1) 十 … 
十 PINDI* 和 十 PIN 十 1):,S 为 由 范 德 蒙 矩阵 的 QR 分 解 的 下 分 量 , MU 包含 输入 变量 x 
的 均值 和 方差 ,具体 有 XHAT = (X 一 MU(C1))7VMU(2) ,其 中 MU(C1) = MEAN(X)、 
MU(2) = STD(X), 

多 项 式 拟 合 的 一 般 方法 可 归纳 为 以 下 几 步 : 

(1) 由 已 知 数 据 画 出 函数 粗略 的 图 形 一 一 散 点 图 ,确定 拟 合 多 项 式 的 次 数 n。 


(2) 列表 计算 > ,好 (1 = 二 0,1,…,2n) 和 > xiyi(j 一 0,1,…，272)。 
i=0 i=0 


(3 二 出 正规 方程 组 ; 求 出 HD sl "stlno 


ee 


(4 


a 


写 出 拟 合 多 项 式 pu(Cz) 一 》) arr*。 
下 一 0 

调用 格式 : 

[pS,mul] = polyfit(x, y,n) 


其 中 ,zr 为 已 惹 离散 数据 点 工 坐标 点 ; y 为 已 知 离 敬 数 据点 vy 侍 标 点 ; nn 为 拟 合 阶 
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次 ; S 为 由 旋 德 过 和 矩阵 的 QR 分 解 的 尺 分 量 ; mu 包含 输入 变量 z 的 均值 和 方差 。 
polyfit 程序 编写 如 下 : 
function [p,S,m]| = polyfit(x,y,n) 


if ~—isequal(size(x),size(vy)) 
error(message('MATLAB 拟 合 数据 维 数 不 一 致 ')) 


end 
xX 二 XKX(:); 
A 


if nargout > 2 
mu = [mean(x); std(x) |]; 
XxX = (x— ml1))/mul(2):; 


end 


种 构造 范 德 劳 矩阵 
V(:,n+1) = ones(length(x),1,class(x)):; 
for]j 三 mn:—1:1 

VU) = x Vj+1); 


end 


和 求解 最 小 二 乘 问题 
[Q,R] = qr(V,0); 
ws = warning('off'’', 'all'); 
E00 同 D = WNY 
warning(ws).; 
if size(R,2) > size(R,1) 
warning (message( 'MATLAB 拟 合 不 唯一 ')) 
elseif warnIfLargeConditionNumber(R) 
1f nargout»> 2 
warning(message( 'MATLAB 拟 合 了 重复 的 点 !)); 
else 
warning(message( 'MATLAB 需要 扩展 拟 合 点 ')); 
end 
end 
if nargout > 1 
rr 二 YY Vxp: 
S.R= R; 
S.df = max(0,length(y) 一 (n+1)); 
S. normr = norm(r):; 


p= Pp.; 第 多项式 系 数 行 向 量 公 约 


【 例 6-5】 对 如 表 6-3 所 示 数 据 进 行 多 项 式 拟 合 。 
表 6-3 数据 表 


对 该 数据 进行 散 点 图 绘制 ,如 图 6-8 所 示 。 


clc,clear, close all 
= [129,140,103.5,88,185.5,195,1051; 
X= SOIrt(x):; 


[7.5,142,23,147,23,138,86|; 


了 
y= sort(y); 
plot(x, y, 'ro—— ') 
grid on 

xlabel( 'x') 
Ylabell( 'Y') 


运行 程序 ,输出 结果 如 图 6-8 所 示 。 
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图 6-8 散 点 图 


对 该 数据 进行 散 品 


次 多 项 陈 拟 合 操作 如 下 : 
p= polyfit(x, y,4) 


运行 程序 ,输出 结果 如 下 : 


PP 一 
1 .0e 十 加 3 了 3 * 
0.0000 一 0.0000 0.0013 一 履 . 工 73 3.7839 


比较 拟 合 的 结 采 图 ,编程 如 下 : 


p= polyfit( XxX, Yr 4 ) 


vl=p(i,1) % x.*"4+p(1,2) Xx.*3+p(1,3) x.*2+p(1,4} x x+p(1,S5)}*1.; 


hold on 
plot(x, yi, b>——") 
legend(' 原 数据 ', ' 拟 合 ') 
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运行 程序 ,输出 图 形 如 图 6-9 所 示 。 
130 | 


一 一 原 数据 
一 一 拟 语 


100 | 


mm 


图 6-9 ”多 项 式 拟 合 


日 编 MATLAB 多 项 式 曲 线 拟 合 半 数 为 multifit() 。 
功能 : 离散 试验 数据 点 的 多 项 式 曲 线 拟 合 。 
调用 格式 


A = multifit (X,Y,m) 


' 其 中 ,X 为 试验 数据 点 的 zx 坐标 向 量 ; Y 为 试验 数据 点 的 y 坐标 向 量 ; m 为 拟 合 多 
项 式 的 次 数 , A 为 拟 合 多 项 式 的 系数 向 量 。 
【 例 6-6】 在 MATLAB 中 实现 多 项 式 曲线 拟 合 的 代码 如 下 : 


function A= multifit(X,Y,m) 
和 离散 试验 数据 点 的 多 项 式 曲 线 拟 合 
第 试验 数据 点 的 区 坐标 向 量 : X 
和 试验 数据 点 的 了 坐标 向 量 : YY 
第 氢 合 多 项 式 的 次 数 :nm 
第 拟 合 多 项 式 的 系数 向 量 : A 
N= length(X); 
M= length(Y); 
iEfN 一 = M) 

return; 
end 
cc(l1:(2xm+1)}=0; 
blli:(m+ti+1)}=0-. 


for j=1:(2x*m+1) 竺 求 出 c 和 上 b 
for k=1:N 

SUI el RE I 1 

P(t 2)) 

\ b(j)=b(j) +Y(k) * Xx(k)*(j— 1); 

end 


end 


end 
CcC(1,:)=c(l:(m+t+1))}):-: 
fors=2:(m+1) 

C(s,:) = cec(s:(m+ s)}.; 
end 


A=b"\C; 名 直接 求解 法 求 出 拟 合 系数 


在 MATLAB 命令 窗口 中 输入 以 下 命令 : 


clc,clear,close all 
二 00:3; 
ee 

了 = sort(y); 

plot(x,y, 'ro—— ') 

grid on 

xlabel( 'x') 

ylabel( 'y') 

p= multifit(x, vy,4) 
Yl1=p(l1l,1}) x."4+p(1,2) x x."3+p(1,3) x.*"2+p(1,A4) x x+p(l1,S5)x1.; 
hold on 

plot{(x, yi, > 一 一 人 
legend(' 原 数据 ',' 拟 合 ') 


输出 结果 如 下 : 
PB = 
1 .Oe+O06 x 
0.0000 0.0000 0. 0002 0.0437 8.0890 


输出 图 形 如 图 6-10 所 示 。 


一 上 一 月 类 信 拓 


0 
U QS 1 .0 | 2.U .3 3.0 


图 6-10 ” 拟 合 效果 图 
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6.4 线 拟 合 的 最 小 二 乘法 


在 数据 处 理 中 ,往往 要 根据 一 组 给 定 的 实验 数据 (riyy)(C 一 0,1:,… :72): 求 出 目 变 量 


Br 与 因 变 量 y 的 ] 国 数 关系 VY 二 s(x sD sl ss""" stln ) s 71 7 ,这 上 时 1 为 待定 参数 。 由 于 观测 数 


据 总 有 误差 , 旦 待定 参数 a; 的 数量 比 给 定数 据点 的 数量 少 ( 即 nn 二 mmx) ,因此 它 不 同 于 插值 
问题 。 
这 类 问题 只 要 求 在 给 定点 ri; 上 的 误差 6; = 二 s(xzi) 一 yi(i = 二 0,1,2,…,m) 的 平方 和 


> 163 最 小 。 当 s(x) E€ span{go ;giz ,gn} 时 , 即 
1 一 由 


| 


Sr) = aopo (x) Tam (TT Tangpn (Tt) 
式 中 ,po Cr) pT) p(T) ,pn (TX)E Cla,5j 是 线性 无 关 的 肾 数 族 。 
参数 coal an 的 线性 方程 组 用 和 矩阵 表示 为 
(porpo) (porm) 《poyopz) … (gospx)| |ao | 《yy oo 
(ypo) pm) 《pyopz) 《plyopr) aa (yp1) 


| 


(asmo) 《ri Cnrpa) “De 
上 式 称 为 法 方程 。 
从 而 得 到 最 小 二 乘 拟 合 曲线 
ee 
均 方 误差 为 


8: = 


3 a 
i=0 

在 最 小 二 乘 通 近 中 ,在 取 ws (Xx) =x (k=0,1,2,.… ,7) ， 则 sz)Espan{f1 工 , 工 ，…， 
x"}) ,表示 为 

s(xX) 一 ao 十 Qi 工 十 az 二 anr” 

此 时 关于 系数 aoaiyasz:， :an 的 法 方程 是 病态 方程 。 

【 例 6-7】 某 观测 站 测 得 某 日 6:00 一 18:00 之 间 每 隔 2h 的 室外 温度 如 表 6-4 所 示 ， 
用 样 条 插值 分 别 求 得 该 室内 外 6:30 一 17:30 之 间 每 阳 2h 各 点 的 近似 温度 值 。 


表 6-4 温度 值 


时 间 hh 
室外 温度 


根据 表 6-4 中 数据 ,采用 立方 拟 合 ,编程 如 下 : 


function vy3 
Clc, clear,close all 
Clc, clear,close all 
h= 1:0.5:4; 千 时 间 


共 回 共 央 繁 总 作 enet ee er 


| 必 

: : 

9 

. 出 2 
E = 
En 兴 
# 和 
三 4 三 
人 3 
本 坚 
也 得 从 
出 和 出 
kk 至 . 
中 人 中 
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I | | 
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图 6-11 曲线 拟 合 


6.5 用 正 交 多 项 式 作 最 小 二 乘 拟 合 


设 给 定 拟 合 数据 (ziyy) 及 权 wi (i 二 0,1,2,…,m) 可 构造 多 项 式 {P; (x)}3, 其 中 


wp ER z AR 
i 一 0 


吉 la, 本 得 TT kk 
令 gx 一 Pi(k 二 0,1,2,…,n) ,由 法 方程 可 求 得 解 


b> ye(ri) 
i 


I a 
Sj wiPiCzxi) 
£ 王 必 


从 而 得 到 最 小 二 乘 拟 合 曲 线 : 
y= ss (rz) = a PoCx) tar PiCx) a P, (zr) 

用 正 交 多 项 式 作 最 小 二 乘 拟 合 ,应 根据 给 定数 据 x; 及 权 w:(i 二 0,1,2,…,m) 定 义 关 
于 离散 后 集 {xi}8 市 权 {roj 的 正 交 多 项 式 (pi (zx)}38。 它 本 质 上 与 在 区 同 [ 一 1,1] 上 害 
多 的 正 交 多 项 式 相 似 , 只 是 把 积分 变 成 求 和 ,再 以 所 得 到 的 关于 点 集 正 交 的 多 项 式 作 基 ， 
求 最 小 二 乘 的 拟 合 曲线 ,这 就 避 鲍 了 用 一 般 多 项 式 拟 合 出 现 解 法 方程 的 病态 问题 。 

在 MATLAB 中 编程 实现 的 函数 为 zjdxsfit 

功能 : 正 交 多 项 式 拟 合 。 

调用 格式 : 

a= zjdxsfit(x,y,m) 

MATLAB 中 国 数 如 下 : 


; y 为 输入 因 变 量 ; m 为 求解 拟 合 最 局 除数 ; a 为 返回 的 多 项 


function a= zjdxsfit(x,vy,m) 
多 xXx: 输入 自 变 量 
和 Y: 输入 因 变 量 


第 m:; 求解 维 数 
if(length(x) == length(y)) 
n = length(x); 
else 
return; 
end 秆 维 数 检查 
SYmS V; 


d = zeros(1l,m+i+1); 
可 = zeros(l,m+1); 
alpha = zeros(l,m+1); 
fork=0:m 
px(k+i+1)= power(v, k); 
en 和 区 的 知 多 项 式 
B2 = [11]; 
d(1) = n; 
far 全 三 了 :> 而 
qll) = ql(1) + yl1); 
alpha(1) = alpha(1) + x(1); 
end 
q(1) = q(1)/d(1); 
alpha(1) = alpha(1)/d(1); 


a(1) = q(1); 名 算法 的 第 一 步 , 求 出 拟 合 多 项 式 的 常数 项 
Bl = [ -alpha(l} 11]; 
for l=1:n 


d{(2) = d(2) + (x(1) -alpha(1))"2; 
q(2) = q(2) + vy(l1)* (x(1) — alpha(1 )); 
alpha(2) = alpha(2}) + 买 ( 工 ) * (x(1) ~- alpha(1)}))}*2; 
end 
q(2) = q(2)/d(2); 
alpha(2) = alpha(2)/d(2):; 
a(l1) = a(l1)}+q(2) * (— alpha(l )); 和 更 新 拟 合 多 项 式 的 常数 项 
a(2) = q(2); 第 算法 的 第 二 步 , 求 出 拟 合 多 项 式 的 一 次 项 系数 
beta = d(2})/d(1):; 
for i=3:(m+1) 


B = zeros(l1,1); 
B(1) = BlLIIL 一 工 ) ; 
B(i-1) = -alpha(i-1)*Bi(i-1)+B1i(i-2); 
for j=2:1i—2 
B(j) = alpha(i—1)* B11(j)+B1(j— 1)- beta* B2(j):; 
end 
B(1) = —alpha(i—1)* Bi(1)— betax*x BP2(1); 
BF = Bx transpose(px(1:1)); 
for l=1i:n 


Qx = subs(BF, 'v',x(1)); 

d{(1i) = d(i) + (Qx)’2; 

q(1) = q(1) + 了 CT) * Ox; 

alpha(i)} = alpha(i) + x(1) x (Qx)’2; 
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end 

alpha(i) = alpha(i)/d(i); 
i qa 

beta = d(i}/d(i — 1):; 

for k=1:1i—1 


a(k) = a(k) 十 可 ( 工 ) * B(k); 


end 
a(i) = ql(i) * B(1); 
B2 = Bl: 
Bl = B; 
end 


end 


千 更 新 拟 合 多 项 式 的 系数 


【 例 6-8〗 对 如 表 6-5 所 示 数 据 进 行 正 交 多 项 式 最 小 二 乘 拟 谷 。 
表 6-5 数据 表 


由 以 上 分 析 编 程 如 下 : 


function v4d 
Clc, clear,close all 
Clc, clear,close all 
= 
下 三 炳 了 时 工本 
了 = zjfit(h,t,3) 


委 时 间 
室外 温度 


yl = vy(1,4) x h.*3+vy(1,3) x h.*2+v(1,2) x* h+v(1,1); 


plot(h,t,'s—— '); 
hold on 
plot(h,vi,'ro——') 
grid on 
xlabel('h') 
ylabel( 't') 


end 
function a = zjfit(x, vy,m) 


if(length(x) == length(vy)) 
n = length(x):; 

el]se 
disp('x 和 yy 的 维 数 不 相等 !'); 
IELtUurn; 

end 

SVMS V; 

d = zeros(l1,m+1): 

可 = zeros(l,m+1); 

alpha = zeros(1,m 十 1) ; 


% 维 数 检查 


fork=0:m 

px(k+1)= power(v, k); 数 
end 物色 的 徊 多 项 式 拟 
B2 = [1]; 全 
d(1) = ni 
forl=1:n 


ql(1) = q(1}y + v1); 
alpha(1) = alpha(1) + x(l1); 
end 
q(1) = q(1)/d(1); 
alpha(1) = alpha(1)/d(1):; 


a(1) = ql(1); 秆 算法 的 第 一 步 , 求 出 拟 合 多 项 式 的 常数 项 
Bl = [~—-alpha(l1) 1]; 
forl=1:n 


d(2) = d(2) + (x(1) -alpha(1))’2; 
q(2) = q(2) + yY(1)* (x(1) -alpha(1)); 
alpha(2} = alpha(2} + x(1) * (x(1) — alpha(1))}’2; 
end 
q(2) = q(2)/d(2); 
alpha(2) = alpha(2)/d(2); 
a(1) = a(1) +q(2) x ( 一 alpha(1)); 名 更 新 拟 合 多 项 式 的 常数 项 
= 0 名 算法 的 第 二 步 , 求 出 拟 合 多 项 式 的 一 次 项 系数 
beta = d(2}/d(1)}):; 
for i=3:(m+1) 


B = zeros(l1,1i); 
B(i)} = Bil(i—1); 
B(i—-1) = -alpha(i—-1}x*x*B1(i—-1})+B1(i—2); 
下 三 二 
B(j) = —alpha(i—1)}x Bl(j)+B1(j— 1)— betax B2(j); 
end 
B(1) = —alpha(i—1)* Bl1(1)— beta x*x B2(1 ):; 
BEF = Bx transpose(px(1:1)); 
for l=1:n 


Ox = subs(BF, 'v',x(1)): 
d(21) = d(1) + (Qx)”*2; 
q(2) = q(1) + vy(l1)* Ox; 
alpha(i) = alpha(i) + x(1) * (Qx)”2; 
end 
alpha(i) = alpha(i})/d(i); 
q(i) = q(i)}/d(i); 
beta = d(i}/d(i— 1); 
for k=1:1i—-1 
a(k) = a(k)+q(i) * B(k); 名 更 新 拟 合 多 项 式 的 系数 


end 
ali) = q(i) x Bli); 
B2 = Bi; 
Bi = B; 
end 
end 
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la 行程 于 ,输出 结果 如 下 : 


0.2200 0.1429 0.0429 0 


绘制 相应 的 拟 合 图 形 ,编程 如 下 : 


yl = y(1,4) x h.*3+y(1,3) * h.*2+y(1,2) * h+y(1,1); 
plot(h,t,'s—— '); 

hold on 

plot(h, vl, ‘ro —— ') 

grid on 

xlabel( 'h') 

vlabell( 't') 


运行 程序 ,输出 图 形 如 图 6-12 所 示 。 


图 6-12 正 交 多项式 拟 合 


6.6 超 定 方程 组 的 最 小 二 乘 解 


设 线 性 方程 组 Ax= 二 bb 中 ,A 二 (a )mxnsb 了 是 mx 维 已 知 回 量 , 过 是 2 维 解 辐 当 mn 
即 方程 组 中 方程 的 个 数 多 于 未 知 数 的 个 数 时 , 称 此 方程 组 为 超 定 方程 组 。 一 般 来 说 ,起 
定 方程 组 无 解 ( 此 时 为 矛盾 方程 组 ) ,这 时 需要 寻求 方程 组 的 一 个 “最 近似 ”的 解 。 

记 + 一 bp 一 Ax, 称 使 rs 即 | + 3 最 小 的 解 x* 为 方程 组 Ax 一 b 的 最 小 二 乘 解 。 

x* 是 Ax 一 b 的 最 小 二 乘 解 的 充分 必要 条 件 为 x* 是 A'Ax 一 A'b 的 解 。 

号 成 矩阵 形式 为 


ATAx = A'b 
它 是 关于 zi ;xs，… ,xn 的 线性 方程 组 , 称 为 正规 方程 组 或 法 方程 组 。 
由 于 4T4 是 n 阶 对 称 阵 。 当 R(A) 一 nn 时 ,对 任意 y 关 0, 有 Ay 关 0, 所 以 ,yT(ATA)y 一 
(4y,4y) 一 |‖4y 1 一 0, 可 见 4 4 是 正定 和 矩阵, 必 有 det(A'A) 一 0。 故 式 A'Ax 一 A'b 的 
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了 .二 了 总 
了 32 


整理 结果 为 


ya = 5x2 = .9121 
轩 27， 一 5.5238 
人 3223 


he 人 4x2: 二 11. 0476 


则 误差 平方 和 为 

T 一 (11 一 11.0478) 十 (3 一 2.9119) 十 (6 一 5.5239) 十 (7 一 7.3224)” 一 0. 340 659 42 
程序 如 下 : 
B2=A%X 


B3= Bz2—-B 
Sum(B3.^2) 


B3 = 
0.0476 
— 0.0879 
一 0.4762 
0. 3223 

AnNns = 
0.3407 


6.7 非 线 性 曲线 拟 合 


韭 线 性 曲线 拟 合 是 已 知 输 入 癌 量 xdata、 输 出 回 量 ydata: 并 知道 输入 与 输出 的 明 效 
关系 为 ydata 一 上 (xxdata) ,但 不 清楚 系数 癌 量 xx。 进 行 曲线 拟 合 即 求 x 使 得 下 陈 成 立 : 


让 ] 
min 方 | F(x,xdata) 一 ydata | : = -B22 (F(x,xdata) 一 ydata;)”’ 


在 MATLAB 中 ,可 以 使 用 肾 数 lsqcurvefit0) 解 决 此 类 问题 。 其 调用 格式 如 下 : 

(1) x 二 lsgcurvefit(fun,x0,xdata,ydata) 。xo 为 初始 解 品 量 ; xdata、ydata 为 满足 
关系 ydata 二 F(x,xdata) 的 数据 。 

(2) x 二 lsqgcurvefit(fun, x0, xdata, ydata,; lb,ub)。I1b.wub 为 解 癌 量 的 下 界 和 上 界 
Ib 一 x 夸 wub, 奇 没有 指定 界 , 则 1b 一 | ,wb 一 Lj]，。 

(3) x 一 lsqcurvefit (fun, x0, xdata, ydata, lb,ub,options) 。options 为 指定 的 优化 

(4) [x,resnorm | 一 lsqcurvefit(… ) 。resnorm 是 在 x 修 残 差 的 平方 和 。 

(5) [x,resnorm,residual | 一 lsqcurvefit(…) 。residual 为 在 x 人 外 的 残 差 。 


(6) | x, resnorm, residual, exitflag | 一 lsqcurvefit(… )。 exitflag 为 终止 迁 代 的 
条 件 。 

(7) [x,resnorm,residual,exittlag ,output | 一 lsqcurvefit(… )。output 为 输出 的 优 
化 信息 。 

【 例 6-103 已 知 输 入 向 量 xdata 和 输出 回 量 ydata, 且 长 度 部 是 ”使 用 最 小 二 乘 非 
线性 拟 合 旺 数 : 

ydata(i) = zx(1) » xdata(i) 十 工 (2)。sinCxdata(i)) + x(3) » xdata(i)’ 
根据 题 意 可 知 ,目标 函数 为 
min = 3 CP Crs datay — platay 
其 中 
Fix,xdata) = zx(1) .xdata’ 二 XT(2) 。sinCxdata) | xz(3) 。xdata” 
初始 解 向 量 定 位 zo 二 [0. 3.,0.4,0.1j]。 
自 先 建立 拟 合 肾 数 文件 ex1024. m。 


function F = exl024 (x,xdata) 
F = x(1) x xdata.*^2 + x(2) x sin(xdata}) + x(3) * xdata.*3; 


册 编 写 图 数 拟 合 代码 如 下 : 

clear all 

Cle 

xdata = [3.6,7.7,9.3,4.1,8.6,2.8,1.3,7.9,10.0,5.4|]; 

vdata = [16.5,150.6,263.1,24.7,208.5,9.9,2.7,163.9,325.0,54.3]; 
xz = [1i0, 10, 10|]; 

[x, resnorm| = lsqgcurvefit((Wexl024,x0,xdata, ydata) 


结果 如 下 : 


0.2269 0.3385 0 .3022 


IESNOIMm 三 


6.2950 
即 函 数 在 x 二 0. 2269 .x 二 0. 3385 .x 二 0. 3022 处 残 差 的 平方 和 均 为 6. 295， 
6.8 非 线 性 拟 合 转 线性 拟 合 


有 些 非 线性 拟 合 曲线 可 以 通过 适当 的 变量 奉 换 转化 为 线性 曲线 ,从 而 用 线性 拟 合 进 
行 处 理 。 对 于 一 个 实际 的 曲线 拟 合 问题 ,一 般 抑 按 观 测 值 在 直角 坐标 平面 上 摘出 散 点 
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a es ll inden 再 通过 适当 的 变 
量 奉 换 转 化 为 线性 拟 合 问题 , 按 线 性 拟 合 解 出 后 再 还 原 为 原 变 量 所 表示 的 曲线 拟 合 
方程 。 
表 6-6 列举 了 几 类 经 适当 变换 化 为 线性 拟 合 求解 的 曲线 拟 合 方程 及 变换 关系 。 
表 6-6 线性 变换 


曲线 拟 合 方程 变换 后 线性 拟 合 方程 
3 一 az y=aTpr (a 一 lna) 
光一 CT 十 c yy 二 a zx 十 
i Vy =aTpbr 

Se 
.ee y =piar 

] 

人 y =ax’tbrte 
yy 一 GZ 十 5 十 ec 


图 6-13 所 示 是 几 种 凋 见 的 数据 拟 合 情 议 。 


/A、\ 
] [ 于 
E (b) 
y | 
x 本 半 
(d) 


0 
(c) 


图 6-13 数据 拟 合 
图 6-13(a) 中 ,数据 接近 于 直线 , 故 宜 采 用 线性 陨 数 y 二 a 十 bx 拟 合 ; 图 6-13(b) 中 ， 
数据 分 布 接近 于 抛物 线 ,可 采用 二 次 多 项 式 y 一 ao 十 ciz 十 azz 拟 合 ; 图 6-13(c) 中 的 数 
据 分 布 特点 是 开始 曲线 上 升 较 快 ,随后 逐渐 变 慢 , 宜 采 用 双 曲 线 型 呆 数 y 一 -一 7 或 指数 
型 函数 y 二 ae *; 图 6-13(d) 中 的 数据 分 布 特点 是 曲线 开始 下 降 快 ,随后 逐渐 变 慢 , 宜 采 
0 一 或 y 一 一 一 一 或 y 二 ae “等 图 数 拟 合 。 


【 例 6-11] 给 约 方案 。 
-种 新 药 用 于 临床 之 前 ,必须 设计 给 药方 案 。 药 物 进 和 机体 后 通过 血液 输送 到 全 


四 


导 , 在 这 个 过 程 中 不 断 地 被 吸收 、 分 布 \ 代 谢 , 最 终 被 排出 体外 ,药物 在 血液 中 的 浓度 , 即 
单位 体积 血液 中 的 药物 合 量 :, 称 为 血 药 浓度 。 

- 室 模 型 : 将 整个 机 体 看 作 一 个 房 室 : 称 中 心室 :室内 血 药 浓度 是 均 习 的 。 人 快速 毅 脉 
注射 后 ,浓度 立即 上 上升, 然后 迅速 下 降 。 当 浓度 太 低 时 , 达 不 到 预期 的 治疗 效 采 ; 当 浓 度 
太 高 ,又 可 能 导致 药物 中 毒 或 副作用 太 强 。 临 床上 ,每 种 药物 有 一 个 最 小 有 效 浓度 cl 和 

-个 最 大 有 效 浓 度 cz 。 设 计 给 药方 案 时 ,要 使 血 药 浓度 保持 在 ci 一 cz 之 间 。 本 题 设 ci 王 
10,cz 二 25( 单 位 为 ug/ml)， 
要 设计 给 药方 案 , 必 须知 道 给 欧 后 血 药 浓度 随时 间 变 化 的 规律 。 实 验 对 条 人 用 快速 
青 脉 注射 方式 一 次 往 和 人 该 药物 300mg 后 ,在 一 定时 间 t+(h) 有 了 采集 血 药 , 测 得 血 药 浓 度 
cng/ml) 如 表 6-7 所 示 。 


表 6-7 血 药 浓 度 


t/h 


c/ng/ml) 


由 表 6-7 中 数据 , 俩 究 在 快速 静脉 注射 的 给 药方 式 下 血 药 浓度 (单位 体积 血液 中 的 药 
物 合 量 ) 的 变化 规律 。 给 定 药 物 的 最 小 有 歼 浓 度 和 最 大 治疗 浓度 ,设计 给 约 方 案 : 每 次 注 
射 计量 多 大 ? 间隔 时 间 多 长 ? 

由 表 6-7 数据 得 到 其 散 点 图 ,编程 如 下 : 


clc,clear,close all 

t=[0.25,0.5,1,1.5,2,3,4,6,8]:; 

c= [19.21,18.15,15.36,14.10,12.89,9.32,7.45,5.24,3.01]:; 
plot{(t,c, ro—— ','linewidth',2) 

grid on 

axis tight 

xlabel( 't(h)') 

vlabel( ''c(ug/ml)') 


运行 程序 ,输出 图 形 如 图 6-14 所 示 。 


c(ug/ml) 


图 6-14 ”数据 散 后 图 
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对 血 药 浓度 数据 作 拟 合 , 由 图 6-14 知 符 合 负 指数 变化 规律 。 

由 问题 背景 分 析 , 设 药物 排除 速 认 与 血 拘 浓度 成 正比 ,比例 系数 为 k( 二 0), 则 有 
de 
dt 


血液 容积 为 vu,t 二 0 时 注射 计量 为 4d, 了 血 药 浓 度 立 即 为 4/v。 则 有 
(0) = d/v 


一 一 kc 


联 这 上 面 两 式 可 得 


qe 
dt we Et = 己 
了 了) 


在 此 ,d 王 300mg,t 及 c() 在 攻 些 点 处 的 值 如 表 6-6 所 示 , 需 经 拟 合 求 出 参数 有 k、v。 


c(t) = ee 一 |]n(ad/v)— ki 
| 


= lnc, Ul 一 一 上 大， dz 一 InCd/v) 
得 到 y 二 ait 十 a; 其 中 二 一 a1;v=d/e*。 
编程 求解 如 下 : 


Clc,clear,close all 

t=[0.25,.0.5.1,.1.5,2;3,4,6,8|; 

= [19.21,18.15,15. 36,14. 10 12. 89 .9.32 7.45 .5.24 3.011:; 
d= 300; 

t=|10.25,0.5,1,1.5,2,3,4,6,8| 

必 三 [19.21 ,18.15 15. 36 14.10 ,12.89 .9.32 7.45 .5.24,3.01| 
Y= log(c) 

a= polyfit(t,y,1) 

k= —a(l) 

v= d/exp(a(2)) 


运行 程序 ,输出 结果 如 下 : 


上 = 
0.2347 


15.0219 


整理 计算 结 采 得 
k= 0.2347(1/h), v= 15.02(])., 
给 药方 案 设 计 : 设 每 关注 射 计 量 为 也 ,间隔 时 间 为 工 , 血 药 浓 度 为 cb , 则 应 有 ci 三 
ctt)<cz 要 次 剂量 Do 应 加 大 。 
给 药方 案 记 为 {Du,D,T} ,有 
(C1) 了 0 一 mez ,有 一 交 CCcs 一 Cl1) 


(2) ci 一 czer- 民 一 下 一 了 ln 2 
民 | 


计算 结果 : Do 一 375. 5, 刀 一 225.3,T 一 3. 9。 
改 可 制定 给 药方 案 : 

Do = 375(mg), DD= 225(mg), 了 一 4Cnh) 
即 首次 注射 375mg: 其 余 每 次 注射 225mg ,注射 的 间 卫 时间 为 4h。 


6.9 用 MATLAB 解决 拟 合 问题 


1. 用 MATLAB 作 线 性 最 小 二 来 拟 合 


(1) 作 多 项 式 Fz) 一 aizi 十 aszrz 十 十 az 十 an+l 拟 合 , 可 利用 已 有 程序 a 二 polyfit 


(xy 。 

(2) 对 超 定 方程 组 Rxmamx1 一 VnXxl (m=—n) 而 言 , 用 Q& 一 民 \y 可 得 最 小 二 乘 意 义 下 
的 解 。 

(3) 多 项 式 在 xz 处 的 值 y 的 计算 命令 为 y 一 polyval(a,x) 。 


2. 用 MATLAB 作 非 线性 最 小 二 乘 拟 合 


两 个 求 非 线性 最 小 二 乘 拟 合 的 图 数 为 lsgcurvefit、lsqgnonlin。 它 们 之 则 相同 点 和 不 
同 点 在 于 : 两 个 命令 都 要 先 建立 M- 文 件 fun. m, 定 义 函 数 f(zx), 但 定义 f(x) 的 方式 
不 同 。 
1) lsqcurvefit 
已 知 数 据点 ， xdata 二 (xdatal,xdata2,*… ,zdatan) 
ydata 一 (ydatal ,ydata2 ,***, ydatan) 
lsqcurvefit 用 以 求 售 参量 z( 回 量 ) 的 问 量 值 函 数 


F(x, xdata) = (F(x,xdatal), ，… ,F(x,xdatan)) 


去 3 (F(x szdatas) — ydatas)? | 
说 明 : x 二 lsqcurvefit ('fun',x0,xdata,ydata,options) ;中 ,fun 是 一 个 事先 建立 的 
定义 因数 F(x,xdata) 的 M- 文 件 ,日 变量 xz 是 迭代 初 值 ,xdata 是 已 知 数据 点 。 
2) lsqnonlin 
已 知 数 据点 :; zdata 一 (rdatal ,xdata2,… ,zdatan) 
ydata 二 (ydatal ,ydata2 ,*…: , ydatan) 
lsqnonlin 用 以 求 含 参量 x( 回 量 ) 的 癌 量 值 电 数 


min 


f(x) = (f1(x), f2(x), -… ,fn(x)) 
中 的 参量 Xx, 使 得 


[FA CR FE 二 L SS fir) fer) 二 fCr) :+L | 
其 中 


Ll| 
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fi(x) = f(x, xdatai, ydatai) = F(x,xdatai) 一 ydatai 


输入 格式 : 

(1) x=l1lsgqnonlint 'fun'. x0); 

(2) x= lsqgnonlin( fun', x0 ,1b,ub); 

(3) x= lsgnonlinC fun',x0, lb,ub,options):; 

(4) [x.options|= lsgqnonlin( 'fun', x0..); 

(5) [x,options, funval |= lsqnonlinC 'fun', x0,*); 

说 明 :， x 一 lsqnonlin('fun',x0,options); 中 ,fun 是 一 个 事先 建立 的 定义 图 数 f(x) 
的 M- 文 件 , 自 变量 为 z,zo 是 迭代 初 值 ,options 是 选项 , 见 无 约束 优化 。 

【 例 6-12】 水 培 流 量 ，。 

某 居民 区 有 一 供 居民 用 水 的 圆柱 形 水 塔 ,一 般 可 以 通过 测量 其 水 位 来 估计 水 的 流 
量 , 但 面临 的 困难 是 , 当 水 培 水 位 下 降 到 设 定 的 最 低 水 位 时 ,水 录 日 动 局 动 回 水 培 供 水 ， 
到 设 定 的 最 高 水 位 时 仿 止 供水 ,这 段 时 间 无 法 测量 水 培 的 水 位 和 水 录 的 供水 量 。 通 营 水 
录 每 天 供水 一 两 次 ,每 次 约 两 小 时 ，。 

水 培 是 一 个 高 12. 2m, 直径 17. 4m 的 正 圆柱 。 按 照 设 计 , 水 培 水 位 降 至 约 8. 2m 时 ， 
水 条 目 动 司 动 :水 位 升 到 约 10. 8m 时 水 条 停止 工作 。 

表 6-8 所 示 是 某 一 天 的 水 位 测量 记录 , 试 估计 任何 时 刻 ( 包 括 水 泵 正 供水 时 ) 从 水 增 
流出 的 水 流量 及 一 天 的 总 用 水 量 。 

表 6-8 水 位 测量 记录 (符号 // 为 水 双 启 动 ) 
时 刻 /h 
-TR , / i | a 


由 题 可 知 , 流 量 估计 的 步骤 如 下 : 

(1) 拟 合 水 位 一 时 间 盟 数 。 从 测量 记录 看 ,一 天 有 2 个 供水 时 段 ( 简 称 第 1 供水 时 段 
和 第 2 供水 时 段 ) 和 3 个 水 条 不 工作 时 段 ( 人 徐 称 第 1 时 段 上 一 0 到 上 一 8.97 :第 2 时段 上 一 
10. 95 到 上 一 20. 84 和 第 3 时 段 上 一 23 以 后 ) 。 对 第 1.2 时 段 的 测量 数据 直接 分 别 作 多 项 
式 拟 合 ,得 到 水 位 限 数 。 为 使 拟 合 曲线 比较 光滑 ,多 项 式 次 数 不 要 太 高 ,一般 为 3 一 6。 由 
于 第 3 时 段 只 有 3 个 测量 记录 ,无 法 对 这 一 时 段 的 水 位 作出 较 好 的 拟 合 。 

(2) 确定 流量 一 时 间 晒 数 。 对 于 第 1.2 时 段 只 需 将 水 位 盟 数 求 导 数 即 可 ,对 于 两 个 
供水 时 段 的 流量 , 则 用 供水 时 段 前 后 (水 泵 不 工作 时 段 ) 的 流量 拟 合 得 到 ,并 且 将 拟 合 得 
到 的 第 2 供水 时 段 流 量 外 推 , 将 第 3 时 有 段 流 量 包 含 在 第 2 供水 时 段 内 。 

(3) 一 天 总 用 水 量 的 估计 。 总 用 水 量 等 于 两 个 水 泵 不 工作 时 段 和 两 个 供水 时 段 用 水 
量 之 和 ,它们 都 可 以 由 流量 对 时 间 的 积分 得 到 。 


算法 设计 与 编程 : 

(1) 拟 合 第 1、2 时 段 的 水 位 ,并 导出 流量 。 

(2) 拟 合 供水 时 段 的 流量 。 

《3) 估计 一 天 总 用 水 量 。 

(4) 流量 及 总 用 水 量 的 检验 。 

下 面 分 别 进行 介绍 ，。 

1) 拟 合 第 1 时 段 的 水 位 ,并 导出 流量 函数 公式 

设 t+h 为 已 输入 的 时 刻 和 水 位 测量 记录 (水 泵 启动 的 4 个 时 刻 不 输 入 ), 第 1 时 段 各 
时 刻 的 流量 散 点 图 绘制 编程 如 下 : 


- 小 冤 尘 尝 党国 愉 


clc,clear,close all 

和 名 第 1 个 时 段 
tl1=[0,0.92,1.84,2.95,3.87,4.98,5.90,7.01,7.93,8.97|]; 
hl = [968,948,93]1,913,898,881,869,852,839,822|; 
plot(t1, hl,'ro—— ,linewidth',2) 

grid on 

axis tight 

XxXlabel(' 时 到 (h)') 

Ylabel(' 水 位 (cm)') 


运行 程序 ,输出 图 形 如 图 6-15 所 示 。 
960 上 


GO 


水 位 (em) 


RR 
| | | 
$40 一 | 起 上 | 1 
| | | 
| | | | 
D1 2 3 4 so 6 7 Ba 
时 刻 (h) 


(1) 多 项 式 拟 合 编程 如 下 : 


clc,clear,close all 

tl = [0,0.92,1.84,2.95,3.87,4.98,5.90,7.01,7.93,8.97|]; 

hl = [968,948,931,913,898,881,869,852,839,822 |: 

t2= [10.95,12.03,12.95,13.88,14.98,15.90,16.83,17.93,19.04,19.96,20.84|; 
h2 = [1082,1050,1021,994,965,94]1,918,892,866,843,822|]; 

cl = polyfit(t1,hl,3) 名 用 3 次 多 项 式 拟 合 第 1 时段 水 位 ,cl 输出 3 次 多 项 式 的 系数 


运行 程序 :输出 结 采 如 下 : 
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己 ] = 
— 0.0785 1.3586 一 22.1079 967.7356 


(2) 输出 多 项 式 ( 系 数 为 cl) 导 数 的 系数 。 编 程 如 下 : 
al = polyder(c1) 
运行 程序 :输出 结 采 如 下 : 


I 
一 和 全 . 2356 2. T7173 一 2. 1079 


整理 续 采 得 流量 图 数 为 


f(t) =— 0.23567’ + 2.7173t 一 22. 1079 
| (3) 输出 多 项 式 ( 系 数 为 al) 在 第 工时 段 凡 点 的 图 数值 ( 取 负 值 ), 即 第 1 时 段 的 流量 。 


编程 如 下 : 


xl = polyval (al,t1) 


运行 程序 ,输出 结 采 如 下 : 


XxX] = 
| Columns 1 through 5 
' — 22.1079 — 19.8074 一 17.9058 — 16.1424d — 15.1209 
| Columns 6 through 10 
| — 14.4194 一 14.2780 — 14.6384 he ee hl 一 16.6925 


2) 拟 合 第 2 时 段 的 水 位 ,并 导出 流量 
设 荆 为 已 输入 的 时 刻 和 水 位 测量 记录 (水 条 司 动 的 4 个 时 记 不 输入 ) ,第 2 时 段 各 
时 刻 的 流量 散 点 图 如 图 6-16 所 示 。 


本 


水 位 (cm) 


上 时刻 J(h) 
图 6-16 第 2 时段 散 点 图 


(1) 多 项 式 拟 合 编 程 如 下 : 
clc,clear,close all : 
t2= [10.95,12.03,12.95,13.88,14.98,15.90,16.83,17.93,19.04,19.96,20.84]; 


h2 = [1082,1050,1021,994,965,941,918, 892,866, 843, 822] ; 
C2 = polyfit(t2, h2,3) 和 多用 3 次 多 项 式 拟 合 第 2 时段 水 位 ,c2 输出 3 次 多 项 式 的 系数 


运行 程序 ,输出 结果 如 下 : 
C2 三 


1.0e+03 * 
一 0.0000 0. 0026 一 0.0741 1.6394 


(2) 输出 多 项 式 ( 系 数 为 c2) 导 数 的 系数 。 编 程 如 下 : 
a2 = polyder (c2) 


运行 程序 ,输出 结果 如 下 : 


A 三 
— 0.1370 .511 一 74.1016 


f(t) 一 一 0. 137 大 十 5.25177: 一 74. 1016 
(3) 输出 多 项 式 ( 系 数 为 a2) 在 第 1 时 段 内 点 的 图 数值 ( 取 负 值 ), 即 第 1 时 段 的 流量 。 


x2 = polyval(a2,t2) 


运行 程序 :输出 结 末 如 下 : 


x2 一 
Columns 1 through 5 
— 33.0220 一 30.7503 一 29.06r2 -27.6015 -26.1738 
Columns 6 through 11 
一 25.2343 一 24.5204 -23.9818 一 23.7145 一 23.8585 一 24.1558 


3) 拟 合 供水 时 段 的 流量 

在 第 1 供水 时 段 (C 王 9 一 11) 之 前 ( 即 第 1 时 段 ) 和 之 后 ( 即 第 2 时段) 各 取 几 点 ,其 流 
量 已 经 得 到 ， dy FH 1 供水 时 段 的 流量 。 为 使 流量 也 数 在 上 9 和 二 11 连续 ,从 
单 地 只 取 4 个 点 , 拟 合 3 次 多 项 式 ( 即 曲线 必 过 这 4 个 点 )。 实 现 如 下 : 

clec,clear, close all 

名 第 1 个 时 段 


ti= [0,0.92,1.84,2.95,3.87,4.98,5.90,7.01,7.93,8.97]; 
hl = [368,9348,39331,913,898,881,869,852,839,822|; 


bl 

bh 

| 

h 
my 
20 1 图 
i 
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名 第 2 个 时 段 
t2= [10.95,12.03,12.95,13. 


88,14.98,15.90,16.83,17.93,19.04,19.96,20.84]; 


h2 = [1082,1050,102]1,994,965,94]1,918,892,866,843,822|]; 


cl = polvfit(t1, hl,3) 

al = polyder (cl1) 

c2 = polvfit(t2, h2, 3) 

a2 = polyder(c2) 

xxl] = polyval(al, [8 91); 
xx2 = polyval(a2, [11 12]); 


xx1l2=|xxl xx2|]:; 


cl2= polvyfit([8 9 11 i121],xx12,3); 


al2 = polyder(cl12) 
tz2==9:0.3:11:-: 
x12 = polyval(c12,t12) 


运行 程序 ,输出 结 采 如 下 : 


— 6.3849 


X12 
一 总 .2114 


和 用 3 次 多 项 式 拟 合 第 1 时 段 水 位 ,cl 输出 3 次 多 项 式 的 系数 
和 用 3 次 多 项 式 拟 合 第 2 时段 水 位 ,c2 输出 3 次 多 项 式 的 系数 


多 取 第 1 时 段 在 七 =8,9 的 流量 
千 取 第 2 时段 在 =11,12 的 流量 


第 氢 仿 3 次 多 项 式 


先 X12 输 出 第 1 供水 时 段 各 时 刻 的 流量 


ee ee sh — 9.1054 一 7.8748 一 .8800 


在 第 2 供水 时 段 之 前 取 :一 20、.20. 8 两 点 的 流水 量 , 在 该 时 刻 之 后 (第 2 时 段 ) 仅 有 3 
个 水 位 记录 ,用 差分 得 到 流量 .然后 用 这 4 个 数值 拟 合 第 2 供水 时 段 的 流量 如 下 : 


多 第 3 时段 

t3= [23.88,24.99,25.91]; 
h3 = [1059, 1035, 1018]; 
dt3 = diff(t3); 

dh3 = diff(h3); 

dht3 = dh3. /dt3; 


s% 最 后 3 个 时 刻 的 两 两 之 差 
最 后 3 个 水 位 的 两 两 之 差 
村 上 3(1) 和 t3(2) 的 流量 


t23= [19.96 20.84 t3(1,1) t3(1,2)]; 


xx3 = [ — polyval(a2,t23(1:2)),dht3]; 


c3 = polvfit(t23, xx3,3) 
a3 = polyder (c3) 

t33= 20.8:0.4:24; 

x3 = polyval (a3,t33) 


运行 程序 ,输出 结 采 如 下 : 


,5 
1.0ei+O0d x 
0.0002 — 0.0110 0. 
a3 = 
1.0Q0e+03 x 
0.0049 0.2197 2. 
x3 = 
— 6. 8950 一 12. 2384 
-11.2192 -5.6161 


先 取 t3 各 时 刻 的 流量 
第 氢 售 3 次 多 项 式 


当 x3 输出 第 2 供水 时 段 (外 推 至 廿 = 24) 各 时 刻 的 流量 


2438 一 人 .78B86 
4377 
一 16. 0094 一 1]8. 2081 — 18. 8344 — 17. 8883 一 13. 3699 


拟 合 的 流量 负数 为 
f(t) 一 一 0. 1405t + 7.3077t— 91. 8283 
4) 一 天 总 用 水 量 的 估计 拟 
第 1、2 时 段 和 第 1.2 供水 时 段 流 量 的 积分 之 和 , 怠 是 一 天 的 总 用 水 量 。 虽 然 各 时 段 
的 流量 已 表示 为 多 项 陈 图 数 .用 数值 积分 计算 一 天 总 用 水 量 如 下 : 


vl = 0.1* trapz(xl) 第 第 1 时段 用 水 量 ( 仍 按 高 度 计 ),0.1 为 积分 步 长 
V2= 0.1* trapz(x2) 和 第 2 时段 用 水 旱 

yl12=0.1*% trapz(x12) 名 第 1 供水 时 段 用 水 量 

vy3= 0.1* trapz(x3) 委 第 2 供水 时 段 用 水 量 


y= (yl +y2+yl2+y3) *237.8x*0.01 外 一 天 总 用 水 量 


运行 程序 ,输出 结果 如 下 : 


yi = 
146.1815 
Y2 = 
260.8114 
Tl 
16.1576 
"Es 
46.8264 
至 三 
1.1176e+ 03 


整理 计算 结果 有 
y1 = 146.1815, ws = 260.8114, ws = 16.1576, ys = 46.8264, y= 1117.6 
5) 流量 及 总 用 水 量 的 检验 
计算 出 的 各 时 刻 的 流量 可 用 水 位 记录 的 数值 微分 来 检验 。 用 水 量 yi 可 用 第 1 时 段 
水 位 测量 记录 中 下 降 高 度 968 一 822 一 146 来 检验 ,类 似 地 ,ys 用 1082 一 822 一 260 检验 。 
供水 时 段 流 量 的 一 种 检验 方法 如 下 : 供水 时 段 的 用 水 量 加 上 水 位 上 升值 260 是 该 时 
段 采 人 的 水 量 , 除 以 时 段 长 度 得 到 水 条 的 功率 (单位 时 间 条 人 的 水 量 ), 而 两 个 供水 时 段 
水 泵 的 功率 应 大 致 相等 。 第 1.2 时 段 水 泵 的 功率 可 计算 如 下 : 


plL= (yl12+260)/2; 名 第 1 供水 时 段 水 村 的 功率 (水 量 仍 以 高 度 计 ) 
tp4 = 20.8: 0.1: 23; 

xp2 = polyval(c3,tp4); 秆 xp2 输出 第 2 供水 时 段 各 时 刻 的 流量 

p2= (0.1* trapz(xp2) + 260)/2.2; 钨 第 2 供水 时 段 水 标的 功率 (水 量 仍 以 高 度 计 ) 


整理 计算 结果 有 
pi 154. Ds ps 一 一 140. 1 


6. 10 数据 拟 合 方法 


由 已 各 数据 ,寻求 一 个 图 数 y 二 f(z) ,使 得 f(x) 在 条 种 准则 下 与 所 有 数据 点 最 为 接 
近 , 即 曲线 拟 合 。 其 中 线性 最 小 二 乘法 是 三 曲线 拟 合 中 最 第 用 的 方法 。 
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若 已 知 离散 数据 向 量 x,y; 则 polyfit(x,y,;N) 采 用 最 小 二 乘法 构造 一 个 NN 次 多 


在 MATLAB 中 实现 最 小 二 乘 拟 合 通常 采用 两 种 途径 : 

(1) 利用 polyfit() 图 数 进 行 多 项 式 拟 合 。 

P 王 polyfitCx,y:n): 用 ?2 阶 多 项 式 拟 合 zyy 回 量 给 定 的 数据 。 
PA 王 polyval(P. xi) : 用 Xz; 点 拟 合 明 数 的 近似 值 。 

《2) 利用 稼 用 的 矩阵 除法 解决 复杂 型 曲 数 的 近似 值 。 

【 例 6-133 以 一 次 、 二 次 .三 次 多 项 式 拟 合 表 6-9 所 示 数 据 。 


表 6-9 数据 表 
2 3.0 
Vy 38. 60 
编程 如 下 : 


clc,clear,close all 

= [lS LD 15 2 D2 ds 

y= [1.75,2.45,3.81,4.80,7.00.,8.60]; 

al = polyfit(x,y,1); 

a2 = polyfit (x, y, 2); 

a3 = polvyfit(x, vy,3); 

x1 =[0.5:0.05:3.01; 

vl =al(2) +al(l) x xl; 

yY2= a2(3) +a2(2) x xl1 + a2(1). x* xl. x* xl1; 

vy3=a3(1). x xl. x xl. x xl] + a3(2}). x xl1. x xl +a3(3) x xl + a3(4); 
plot(x,yY,'* '); 

hold on 

Plotlxzliyvi. b==" xl, yor Ek", xl vy3, "TO— "); 

legend{ ' 原 放 数 据 ',' 一 次 氢 合 ',' 二 次 拟 合 ',' 三 次 氢 合 ') 
pl = polyval (al,x) 

Pp2 = polyval (a2,x) 

p3 = polyval (a3, x) 


yl=Y- Pl; 
V2 = 了 一 P2: 
v3=yY- p3; 
sl = norm(vl, 'fro') 竺 计算 F-- 范 执 
s2 = norm(v2, 'fro') 先 计 算 耻 -- 范 数 
s3 = norm(v3, 'fro') 竺 计算 耻 -- 范 数 


运行 程序 ,输出 结果 如 下 : 


pl = 

1.2429 2.6397 4.0366 5. 4334 6.8303 8. 2271 
P2 = 

1. T7107 2.5461 3.6623 5. 0591 6.7367 8.6950 
Ba = 


ph 
[ 
1. 7540 2. 4855 3.62176 5.0938 名 . T7974 9.6517 " 
1 = bl 
据 : 
0.9558 拟 
三 二 三 人 
0. 4220 
S33 = 
总. 4057 


输出 拟 合 图 形 如 图 6-17 所 示 。 
利用 MATLAB 拟 合 工具 箱 进 行 该 数据 拟 合 。MATLAB 拟 合 工具 箱 如 图 6-18 
所 示 。 


米 ”原始 数据 者 
-一 一 -一 次 拟 合 
一 一 二 次 拟 合 


一 “一 三 软 拟 音 


0.5 1.0 1.5 2.0 2.5 3.0 
图 6-17 拟 合 曲线 比较 图 6-18 工具 箱 


一 次 拟 合 如 图 6-19 一 图 6-21 所 示 。 

夯 外 ,MATLAB 还 提供 了 lsqcurvefit() 图 数 和 lsqnonlin() 恩 数 来 求解 一 般 非 线性 
最 小 二 乘 曲 线 拟 合 问题 ，。 

lsqcurvefit(C) 图 数 的 命令 格式 : 

[x, resnorm| = lsqgcurvefit( fun, x0, xdata, ydata ) 

其 中 ,fun 为 需要 拟 合 的 图 数 :; Xo 为 对 图 数 中 各 参数 的 初始 值 : xdata 为 已 知 工 轴 的 
数据 ; ydata 为 已 项 yy 轴 的 数据 ; z 为 最 优 解 ; resnorm 为 误差 的 平方 和 。 

用 lsqcurvefit(C) 图 数 实 现 最 小 二 乘 拟 合 :, 例 如 一 组 实测 数据 如 下 : 


x=[0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9]; 
y= [2.32,2.64,2.97,3.28,3.60,3.91,4.21,4.52,4.82,5.12]; 


Fe 
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不 的 与 


datal 
本 有 linear 


0 
0,.S 1.0 1.5 2.0 2.5 3.0 
0 residuals 


5 LO 1.5 2.0 2.5 3.0 
图 6-19 ”线性 拟 合 


下 15 
=0.56*x-—0.83*xr+1.2 


y=——0.12*x +1.2*x—0.087*x+1.5 
. = 内 datal 


-——— linear 
quadratic 


residuals 


区 1.0 1 .5 2,0 二 了 .0 


图 6-20 ”三 次 多 项 式 拟 合 


Cubic spline mterpolant 

}=0.56*x +0.83*x+1.2 
3=—0.12*x3+1.2*x—0.087*x+1.5 
]——0.26*x +1.7*x —3.2*x+3.9*x+0.35 
3——1.6*x3+14*xt 44*x3 +66*x2—43*x+]1] 


datal 

spline 
———— duadratic 
—-— cubhic 
——--4th degree 

sth degree 


1.0 1.5 2.0 2.5 3.0 
图 6-21 四 ,五 次 多 项 式 拟 合 


若 该 数据 可 能 满足 的 原型 函数 为 "一 az 十 pzrzse “十 d, 试 求 满足 该 数据 的 最 小 二 对 
解 a.b,c,d 的 值 。 编 程 如 下 : 


Clce,clear, close all 

= [0.1.0.2,.0.3,0.4,0.5,0.6,0.7.0.8,0.9,1]; 

T= [2.32.2.64,.2.97.3.28,.3.60,3.91,4.21,4.52,.4.82,5.12|]; 

f= inline('a(l) * xX+a(2) * xX. “2. x* exp( — a(3) x x) +a(d)})', a', 'x'); 
[xx, res] = lsgqgcurvefit(f, ones(1,4),x,v) 


数 
扰 ; 
所 
合 


运行 程序 ,和 输出 结 末 如 下 : 


RR = 
本 ee jk 一 0.2645 D0. 2625 1.9813 
工 它 写 三 
8. T1707T2e— 03 


本 章 小 结 


本 草 基 于 篆 见 的 最 小 二 乘法 基本 原理 ,通过 多 项 陈 拟 合 ,. 非 线性 方程 拟 合并 结合 给 
药方 案 和 水 培 流 量 问 题 : 前 述 了 数据 拟 合 应 用 方法 .让 庶 者 能 够 中正 笃 握 数据 拟 合 方法 。 


过 为 出 斗 妆 十 全国 诸 


大 多 数 实际 工程 问题 常常 简化 为 微分 方程 ,特别 是 在 热力 学 、 进 
化 、 物 理 方程 等 问题 中 ,微分 方程 的 求解 显得 至 关 重 要 。 本 章 讲述 了 
微分 方程 的 边 值 数值 方法 、 差 分 方法 、 符 号 微分 方程 的 求解 以 及 
MATLAB 使 用 等 。 

学 习 目标 : 
熟练 掌握 MATLAB 编程 表示 方法 ; 
。 熟练 运用 MATLAB 求解 微分 方程 模型 ; 
。 熟练 掌握 使 用 MATLAB 工具 解决 简单 工程 问题 等 。 


7.1 符号 微 积分 


符号 变量 在 解决 工程 问题 中 应 用 较 多 ,对 于 一 个 工程 问题 而 言 ， 
一 般 首先 从 变量 出 发 ,把 问题 用 符号 变量 表示 出 来 (得 到 符号 矩阵 )， 
然后 通过 符号 变量 求解 得 到 一 般 表达 式 , 根 据 该 表达 式 ,代入 相应 的 
初始 条 件 , 即 可 得 到 问题 具体 的 解 。 


7.1.1 极限 
1.syms(C) 函数 


半数 sym() 一 次 只 能 定义 一 个 符号 变量 ,使 用 不 方便 。 
MATLAB 提供 了 另 一 个 函数 syms() ,一 次 可 以 定义 多 个 符号 变量 。 
syms() 国 数 的 一 般 调 用 格式 为 


syms 符号 变量 名 1 符号 变量 名 2… 符 号 变量 名 


用 这 种 格式 定义 全 号 变量 时 不 要 在 变量 名 上 加 他 行 串 分 界 和 付 (')， 
变量 间 用 空格 而 不 要 用 运气 分 隔 。 


2. limit(y) 函数 来 极限 
MATLAB 提供 了 求 极 限 恩 数 limit() 。 力 数 调用 格式 为 


Y = limit(fun,x,x0) 


其 中 ,y 为 返回 的 函数 极限 值 ; fun 为 要 求解 的 函数 ; 工 为 图 数目 变量 ; ze 为 图 数 目 


变量 的 取 值 ,x 趋 近 于 xo。 ns 
【 例 7-1〗 MATLAB 求 解 极限 问题 有 专门 的 函数 。 编 程 如 下 : a 

求 

clc,clear,close all 解 


syms Xa 

I1 = limit('(sin(x) — sin(3 x x})/sin(x)',x,0) 

I2 = limit('(tan(x) — tan(a)})}/(x— a})',x,a) 

I3= 1imit("(3x x S)/(x*3x sin(1l/x “2))",x, inf) 


运行 程 订 ,输出 结 采 如 下 : 


IT» = 
tan(a)^2 十 1 


13 = 
3 


7.1.2 导数 


diff() 是 求 微分 最 常用 的 函数 ,其 输入 参数 既 可 以 是 函数 表达 式 ,也 可 以 是 符号 
算 阵 。 

MATLAB 常用 的 格式 是 diff({f,x,n) ,表示 了 关于 工 求 2 阶 导 数 。 

【 例 7-2】 导数 应 用 示例 。 

命令 如 下 : 

clc,clear,close all 

SYmS XxX 


y= sin(x); 
diff(y) 


运行 程 订 ,输出 结 来 如 下 : 


yl = atan(x); 
diff(vy) 
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运行 程序 ,输出 结果 如 下 : 


>> ciEE(y1) 
amS = 
Hx 


行 写 求 导 指令 diff ,程序 如 下 : 


clc,clear,close all 

syms XY 

f= sym('exp(— 2% Xx) cos(3x*x*(1/2))') 
diff(f£f, x) 


ee % 建立 抽象 函数 
站 建立 复合 抽象 函数 


diff({f, x) 
diff(f,x,2) 


运行 程序 ,输出 结 来 如 下 : 


下 = 
exp( — 2x xXx) x cos(3*x*(1/2)) 


ans = 
一 2x exp(— 2xx)*cos(3x*x*(1/2)) — (3*% exp( — 2 x x) * sin(3 x x*(1/2)))/(2 x x “(1/2)) 


| 
g( , Y) 


下 三 
f(x, y, g(x, y¥)) 


ans = 
DIL[3], £f}) (x, Y, g(x, Y) ) * diff (g(x, 了 Y) ， x) + Dll1il: fl TY: g(x, Y) ) 


NS 二 

(Dl([3, 3], £) (x, Yy g(x, Y) ) 关 diff(g(x, Y), x) 十 Dll1i, 3], f) (x, 至 g(x Y) )}) 关 diff( g(x, 
Y) ， xj + D( [1, 3], £f) 让 Yr g(xz, Y) ) x diff(g(x, Y) ， x) + DLL3S] flx, Yr g(x, Y) ) x* diff(g 
(x, Y) ， ie Et Dlir 11 £1 Ye g(x, ¥) ) 


数值 求 守 指 令 diff, 程 序 如 下 : 


clc,clear,cCclose all 

xX= linspace(0,2 x pi, 50); 
y= sin(x); 

dydx = diff(vy). /diff(x); 
plot(x(1:49),dyvydz),arid 


运行 程序 :输出 图 形 如 图 7-1 所 示 。 


|e 


| ee 


| 
[4 
到 
| 
林 
| 
| 
| 
I 
+ 
I 
| 
要 
| 
| 


下 一 一 
| = == 


图 7-1 导数 曲线 图 


7.1.3 积分 


int() 是 求 积 分 最 第 用 的 函数 ,其 输入 参数 可 以 是 函数 表达 式 。 
第 用 的 格式 是 


int(f,r,x0,xl) 


其 中 ,f 为 所 要 积分 的 表达 式 ; rr 为 积分 变量 , 硅 为 定 积 分 , 则 ze 与 zl 为 积分 上 
下 限 。 
【 例 7-3】 求解 积分 函数 int。 编 写 程 厅 如 下 : 


clc,clear,close all 

SYyMS X YZ 

I1 = int(sin(xx y+ z),z) 

I2= int(1/(3+2xxXxX+x*2),x,0,1) 

I3 = int(1/(3+2xxXx+i+x*2),x, — inf, inf) 


运行 程 订 , 输 出 结 来 如 下 : 


I1 = 

— Cos(z 十 xx*vy) 
下 一 

— (2*(1/2) * (atan(8 *(1/2})/4) 一 atan(2 “(1/2))))/2 
I3 = 


(pix#* 2*(1/2))/2 


7.1.4 化 癌 、 提 取 和 代入 


MATLAB 中 行 写 表达 式 的 四 则 运算 比较 和 价 单 ,第 用 的 也 数 介绍 如 下 。 
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(1) factor(S); 对 S 分 解 因 式 ,S 是 符号 表达 式 或 符号 矩阵 。 

(2) expand(S); 对 S 进行 展开 ,S 是 符号 表达 式 或 符号 矩阵。 

(3) collect(S): 对 S 合并 同类 项 ,S 是 符号 表达 式 或 符号 矩阵 。 

(4) collect(S,v): 对 S 按 变 量 v 合并 同类 项 ,S 是 符 写 表达 了 式 或 符号 矩阵。 

(5) simplify(S): 应 用 图 数 规则 对 S 进行 化 简 。 

(6) simple(S): 调用 MATLAB 的 其 他 吧 数 对 表达 式 进 行 综 合 化 简 , 并 显示 化 人 简 


【 例 7-4】 简单 的 化 简 、 提 取 和 代入 。MATLAB 程序 如 下 : 


clce,clear,close all 

Syms 瑟 己 

t= (a+i+x})”6— (a x)’6 

t expand = expand(t) 

t factor = factor(t expand) 
t simplify= simplify(t) 


运行 程序 ,输出 结 采 如 下 : 


(+ x)"6 — (a — XxX)“6 
t expand = 

2% a 人 “DN A0a 人 3A 3 二 2 5 
t factor = 

A (a2 二 3x%X"2)} x (3xa2+ x*2) 
t simplify = 

[a+ XxX)“6 — (a — xXx)’6 


【 例 7-5〗 将 4 一 a6.,5 一 1,c 一 4,x 一 xo 代入 表达 式 /一 oO 十 二 y 中 求 值 。 编 写 程序 


ue 


多 第 1 种 

Clc,clear,close all 

symsabcxyad yo 

f=axbti+c/xxy; 

a= "a0';b=1;c= dd;X= XO0';yY= 3; 

t= subs(f) 

秆 第 2 种 

symsabcxyad0 yo 

f=axbi+c/xx 本 

subs(f .lar cz iT7a0" 1 x0 5}) 


运行 程序 ,输出 结果 如 下 : 


站 = 一 
a0 十 20/x0 


7.1.5 人 和 传 里 叶 变 换 及 其 逆 变 换 


在 MATLAB 中 可 由 哺 数 fourier() 来 实现 估 里 叶 释 换 , 可 由 ifourier() 阴 数 来 实现 合 
里 叶 逆 变换 ，。 


]. fourier() 函数 


fourier() 图 数 种 见 的 调用 格式 如 下 : 

(1) 下 一 fourier(f) 。 返 回 以 默认 独立 变量 z 为 数量 符号 卫 的 傅 里 叶 杰 斤 ,默认 返回 
为 也 的 力 数 。 如 果 ff 一 了 (Cw);, 则 fourier 因数 返回 寺 的 图 数 耻 一 FGi。 和 定义 上 (OOw) 王 int(CfCx) 
x exp(-ix wx xx),x,-inf ,inf) 为 对 工 的 积分 。 

《2) 下 一 fourier(Cfy,v)。 以 习 代 蔡 积 认 变 量 芭 的 傅 里 叶 变 换 , 是 fourierCf,v) 等 价 于 
FCv) 一 int(CfCx) x exp(-ix vx Xx),x,-in{,inf)., 

(3) F 二 fourier(f,uyv)。 以 三 代 和 苦 工 且 对 x 积分, 且 有 fourier(f,u,v) 等 价 于 FCv) = 二 


int({(u) x exp (-ix vx*u),u ,-inf,inf)., 
2， ifourier( ) 函数 


ifourier(C) 图 数 稼 见 的 调用 格式 如 下 : 

(1) {f 一 ifourier(F)。 返 回 默认 独立 变量 w 的 符号 表达 式 下 的 健 里 叶 道 变换 ,默认 返 
上 回 zz 的 图 数 。 如 条 下 Frzr), 则 ifourier 转 数 返回 寺 的 图 数 ff 二 (1) 。 一 般 来 计 ,f(x) 一 
17(2 关 pi) 关 int(F(w) x exp(1¥ w Xx), WwW,-int ,inf) ,对 rw 积分 。 

(2) f= 二 ifourier(F,u)。 以 变量 代替 ,有 日 ifourier(F,u) 等 价 于 ff(u)= 二 1/(2 x Pi) x* 
int(F(w) x exp(ix wx¥* us WwW:-inf,inf)。 对 vw 积分 。 

(3) {二 ifourierC(F,v,u)。 以 代替 w 的 傅 里 叶 逆 变换 ,有 是 有 ifourier(F,v,u) 等 价 于 
fCu) = 1/(2x pi) x* intCFECv) x exp(ix vx us Vs-inft ,inf) ,积分 和 守 对 vw。 


【 例 7-6】 求 下 列 滑 数 的 全 里 叶 变 换 : 让 (7) 二 1/t、F;(1) 二 Ao 和 工 3(t) 一 no © 
在 MATLAB 命令 窗口 中 输入 : 


Clc 

clear 

close all 

clear all ; 

symstbw 

Fl1 = fourier(1/t) 

simple(F1) 

F2= fourier(diff(sym('f(t)})"')),t,w) 
F3 = fourier(sin(bx tt)/(pi x*t)); 

F3 = simple(F3) 


运行 程序 ,输出 结果 如 下 : 
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Fl1 = 

pix (2x heaviside( —w) 一 1) 关 工 
simplify: 

pix (2x heaviside( 一 W) 一 1) 关 工 
radsimp: 

pix (2x heaviside( 一 W) 一 1)xi 
simplify(Steps = 100): 

pix (2x heaviside(—w) 一 1) 兴工 


combine( sincos): 

Pix (2* heaviside( 一 W) 一 1)x1 
combine(sinhcosh): 

pix (2x heaviside( —w) 一 1)*1i 
combine( ln): 

pix (2x% heaviside( 一 W) 一 1) 关 工 
factor: 

(2 x i) xpix (heaviside( 一 mw) — 1/2) 
expand : 

一 pixi++ pix heaviside( ~ w)x2x1 
combine: 

pix (2x heaviside( —w) 一 1)xi 
rewritel(l exp) : 

pix (2x* heaviside( —w) 一 1) 兴工 
rewrite(sincos): 

Pix (2*%* heaviside( 一 W) 一 1)*1 
rewrite(sinhcosh): 

pix (2x heaviside( 一 W) 一 1)}x*1 
rewrite(tan): 


pix (2x% heaviside( —w) 一 1)x1i 
MWwCOS2S1n: 

pix (2x% heaviside( 一 W) 一 1) 关 工 
collect(w): 

pix (2x heaviside( —w) 一 1)x*1 
ans = 

pix (2x heaviside( 一 W) 一 1)xi 
FEF2 = 

wx fourier(f(t), t, w) 兴工 

FE3 = 

heaviside(b + w) 一 heaviside(w 一 b) 


从 结 末 可 知 , 上 述 限 数 的 全 里 叶 变 换 分 别 为 


en le |= 


Fy(w) = FTF OO) |= Gw) FC fC)) 


F, (w) 一 本 


Tt 


fi 
lo, 


sin(pt) )= 


【 例 7-73 求 下 列 明 将 的 傅 里 叶 逆 变换 : 


其 他 


] 


Lo, 


|w| 志 5 


其 他 


已 区 sin (Tt) 


Te 
i 分 
| (tw) = 廊 
| p | ] Te 求 
在 MATLAB 命令 窗口 中 输入 : 解 
clc 
Clear 


close all 

Clear all ; 

symstbw 

Fl1 = sin(w) /w:; 

fl1 = ifourier(Fl1,t) 

fl = simple(f1) 

F2 = 1/(b+jxw); 

f2= collect(ifourier(F2,t)) 


运行 程序 :输出 结 采 如 下 : 


:| 二 

— (pix heaviside(t 一 1) 一 pix heaviside(t + 1))/(2 * pi) 
J 

heaviside(t + 1)/2 一 heaviside(t — 1)/2 

下 


(2x% pix exp( 一 卫 关 七 ) x heaviside(t) 一 PIX exp(— bxt) + pix sign(real(b)) * exp(— bx 


t))/ (2 x pi) 
>> 


从 结 来 可知, 上 述 孙 数 的 传 里 叶 首 变换 分 别 为 
1 1 


eC = pe 1 (tC— (~— 1)) “AK 1(1— 1) 
10， t<0 


ee, 1>0 
二 志 . 一 一 


7.1.6 拉 普 拉 斯 变换 及 其 逆 变 换 

在 MATLAB 中 可 由 因数 laplace(0) 来 实现 拉 普 拉 期 变换 ,可 由 ilaplace(C) 力 数 来 实现 
拉 普 拉 斯 逆 变 换 。 

1]. laplace() 函数 


拉 普 拉 斯 变换 函数 laplace() 的 常用 格式 为 : 

(1) LL 二 laplace(F)。 人 返回 默认 独立 变量 械 的 和 全 号 表达 式 下 的 拉 普 拉 斯 变换 。 了 也 数 
返回 默认 为 S 的 昂 数 。 如 果 下 二 FC(3), 则 拉 普 拉 斯 明 数 返回 t 的 函数 LL 二 L(t)。 其 中 , 定 
义工 为 对 z 的 积分 L(s) 二 int(F(t) x exp(-s x t),0,inf)。 
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(2) LL 二 laplace (F,t)。 以 1 代替 s 为 变量 的 拉 普 拉 斯 变换 。laplace(F,t) 和 等 价 于 
L(t)= int(F(x) % exp(-t* x) ;0,1inf)., 

(3) LL 二 laplace(F,w,z)。 以 z 代替 s 的 拉 普 拉 斯 变换 (相对 于 ww 的 积分 )。laplace 
(FPF,w,z) 等 价 于 L(z) 一 int(F(w) x exp(-z x WwW) ,0,inf), 

其 中 ,下 是 时 域 限 数 表 达 式 ,约定 的 日 变量 是 1, 得 到 的 拉 普 拉 斯 变换 阴 数 是 L(s)。 


2. ilaplace 函数 


拉 普 拉 斯 他 变换 卫 数 ilaplace() 的 第 用 格式 为 : 

(1) 下 一 ilaplace(CL)。 返 回 以 默认 独立 变量 s 的 符号 表达 式 上 L 的 拉 普 拉 斯 迹 变 换 , 默 
认 人 运 回 二 的 晴 数 。 如 采 工 三 L(D), 则 ilaplace 返回 工 的 图 数 了 一 F(Cz)。FGCz) 和 定义 为 对 ， 
的 积分 FCD 二 intCLC8) % exp(s# t), syc-ixinfyc 十 ixinf), 其 中 上 为 选 定 的 实数 ,使 得 
L(s) 的 所 有 奇 后 都 在 直线 s 二 c 的 左 侧 。 

(2) F= 二 ilaplace(L,y)。 以 代替 默认 的 t 的 蚂 数 ,有 旦 有 ilaplace(L,y) 等 价 于 Fl(y)= 二 
int(L(y) x exp(sxy),s,cixinf,cix inf)。 这 里 y 是 一 个 数量 符号 。 

(3) 下 一 ilaplace(L,y,x)。 以 工 代 符 上 的 基数 ,有 1aplace(CL,y,x) 等 价 于 下 (y) 一 
int(L(y) x exp(x¥xy), ysc-ixinfyc 十 ixinfi) ,对 >y 取 积分 。 

民 将 拉 普 拉 斯 消 数 工 变换 为 时 域 限 数 下 。 

【【 例 世 -8】 拉 普 拉 斯 变换 实例 。 求 晴 数 万 (一 ea 为 实数 )、f2 (1) 二 1 一 sint 的 拉 普 

在 MATLAB 命令 窗口 中 输入 : 

le 


Clear 


Close all 


symstsa 千 创 建 符号 变量 

fl = exp(a* t); 

f2=t— sin(t) 委 定 又 函数 

Ll = aplacet( 芋 1) ; 

L2 = laplace(f£2) 委 进 行 拉 普 拉 斯 变 接 


程序 运行 后 ,输出 的 结 采 如 下 : 


f2 = 

t 一 sin(t) 

Li2 三 

l/s*2 一 1/(s*2 + 1) 


由 运行 结果 可 知 
| .-_1 1 
全 五 一 到 下 
【 例 7-9】 拉 普 拉 斯 道 变换 实例 。 求 函数 OOE 的 


SC1 十 2) (《S- 一 1)(3s 一 2) 


拉 普 拉 斯 刻 变 换 。 


在 MATLAB 命令 窗口 中 输入 : 


分 
clc 方 
clear 时 


close all 

symsts 各 创建 符号 变量 Ny 
Fl1=1/( sx(1ii+s*2) }; 
F2= (s+3)/((s+1)x(s+2)) 争 定 义 函 数 

EL = IILaplace(ElL) ; 

E2 = ilaplace(F2) 委 进 行 拉 普 拉 斯 递 变换 


程序 运行 后 ,输出 的 结 采 如 下 : 


EF2° = 

(s+ 3})/({(s + 1}x (s+ 2)) 
fz2 = 

2 exp( 一 七 ) 一 exp( 一 2# 七 ) 


由 运行 结果 可 逢 | 
Li|[F(s)|=1—cos(t), L |F(s)|=2e'—e*”, 1 


V 


7.1.7 Z 变换 及 其 道 变换 


MATLAB 提供 了 符号 运算 工具 箱 , 可 方便 地 进行 Z 变换 和 2Z 首 变 换 。 进 行 Z 变换 
的 了 负数 是 ztrans() ,进行 Z 道 变 换 的 明 数 是 iztrans()。 


1. ztrans()) 寺 数 


负数 ztrans() 第 用 的 调用 格式 如 下 : 

(1) 下 王 ztrans(fi) 。 畏 数 返 回 独 立 变 量 n 关于 和 从 号 同 量 的 Z 变换 明 数 :; ztrans(f) 导 
F(z) 二 symsum(f{f(n)/z",n.0,.inf) ,这 是 默认 的 调用 格式 。 

(2) F 王 ztrans(f,w)。 了 畏 数 返回 独立 变量 n 天 于 和 全 号 回 量 了 的 Z 变换 明 数 ,只 是 用 
ww 代 类 了 默认 的 z: ztrans(f,wjSSFC(w) 二 symsum({(n)/w?”,n,0,inf)., 

(3) 下 一 ztrans(fk,w)。 上 因数 返回 独立 变量 寻 天 于 符号 回 量 大 的 变换 晒 数 : 
ztrans(f,k,w)OF(w)=symsum({(k)/w,k,.,0,inf)., 


2。1lztrans( ) 函数 


师 数 iztrans() 角 用 的 调用 格式 如 下 : 

(1) {二 iztrans(F)。 卫 数 返 回 独 立 变 量 z 关于 符号 回 量 下 的 2 着 变换 因数 ,这 是 默 
认 的 调用 格 却 。 

(2) {二 iztrans(F.,k)。 阴 数 返回 独立 变量 有 关于 符号 问 量 F 的 ZZ 首 变 换 阴 数 ,只 是 
用 有 代替 了 默认 的 z。 

(3) { 一 iztrans(CE, wk)。 因 数 返 回 独 立 变 量 w 关于 符号 同 量 F 的 Z 逆 变 换 明 数 ， 
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【 例 7-10】 Z 变换 实例 1。 试 求 明 数 让 (1) 一 1t、fi(1) 一 e“、fs(1t) 二 sin(at) 的 2Z 
变换 。 

在 MATLAB 命令 窗口 中 输入 : 

cle 


Clear 
Close all 


syms nawkzT 和 创建 符号 变量 ,T 为 采样 周期 
xl] = ztrans(n * T); 

x] = simplify(x]l) 对 进行 变换 并 化 简 结 果 

x2 = ztrans(exp( — ax nx T)); 

x2 = simplify(x2) % 进行 Z 变 换 并 化 简 结 果 

x3= ztrans(sin(w* ax T), w, z) ; 

x3 = simplify(x3) 多 进 行 Z 变 撞 并 化 简 结 果 


Xl1] = 

(Tx ZN/ — 12 
本 

z/(z 一 exp(— Tx aa) ) 
E33 三 


(zx sin(Txa))/(z*“2 一 2xcos(Txa)x*x*z + 1) 


可 见 ,变换 结果 为 
并。 
0 
1 
A 
Ed sin(aT )z 
Te 1—2cos(aT)z "Tz 
【 例 7-11】 2Z 变换 实例 2。 试 求 函 数 Fl Cs) 一 HT、Fo(C) 一 -Fi(Cs) 一 
4 + I 
a—b Py 
Ce 
在 MATLAB 命令 窗口 中 输入 : 
Clc 
Clear 
| close all 
syms sntlt2t3abkzT 和 创建 符号 变量 ,T 为 采样 周期 
' xl1 = ilaplace(1l/s/(s+1), t1): 
| xl] = simplify(x]) 委 进 行 拉 普 拉 斯 递 变换 并 化 简 续 果 
x2= ilaplace(l s/A(s^2 二 aa^2)，t2) ; 
| x2 = simplifvy( x2) 和 进行 拉 普 拉 斯 递 变换 并 化 简 结 果 


x3 = ilaplacel (a—- b)/(s+a)/(s +b), +t3) : 
x3 = simplify(x3) 当 进 行 拉 普 拉 斯 逆 变 换 并 化 简 结 果 


微 
有 
I EE 
了 2 三 求 
cos(a x t2) 也 
i 


exp( — bxt3) 一 exp( -ax t3) 


对 拉 普 拉 斯 逆 变 换 结 来 进行 Z 变换 ,注意 把 时 间 参 数 ,tz ,ts 部 替换 成 nx TT。 在 命 
令 窗 口中 输入 : 


1 记 

Clear 

close all 

syms sntlt2t3abkzT 和 创建 符号 变量 ,TT 为 采样 周期 
x] = ztrans(l1 ~ exp( — nx T)); 

x] = simplifv(x]l) 

x2 = ztrans(cos((a 2)*(1/2} x nx T)); 

x2 = simplifvy(x2) 

x3= ztrans( 一 exp( -axnx* T)+exp(—- bxn* T)); 

x3= simplify!(x3) 


运行 结 来 如 下 

Xl] = 

z/(z— 1) - z/l(z 一 exp( — T)) 

Be = 

(zx (zz 一 cos(Tx (a 2})*(1/2))))/(z*2 一 2% cos(Tx (a*2})*(1/2))xz+ 1) 
让 地 = 


z/(z 一 exp(— Txb)) 一 z/(z 一 exp(— Txa)) 


可 见 ,变换 结果 为 
a Ea zf(K1 一 e i) 

F(z) = 一 一 一 一 一 一 一 一 

zz 一 ] 之 一 已 1 (z— 1)(z—e ) 

] 一 cos(aT)z2 
] — 2cos(aT)z 十 之 
Ea tr 

(1 一 e "liz 1)(]l—e iz!) 

【 例 7-12〗 试 求 函数 Fi(z) 一 2 一 0- 5< 
一 0.5z—0.5 


在 MATLAB 命令 窗口 中 输入 : 


F,(=) 一 


0.5 


和 F(x) 一 习 二 3 二 的 Z 逆 变 换 ， 


-3z 


祈 ] 亡 
Clear 


Close all 
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syms zakT 名 创建 符号 变量 ,TT 为 采样 周期 
xl = iztrans( (2x*z"*2—- 0.5x2z)/(z 2-—-0.5#*xz—-0.5)); 

xl = simplify(x1) 秆 进 行 2 弟 变换 并 化 简 寻 果 
x2= iztrans( (z+0.5}/(z"2+3%z+2) }; 

x2 = simplify(x2) 第 进行 2 北 变 摘 并 化 简 希 果 


运行 程序 ,输出 Z 变换 结果 如 下 : 


Xl] = 

i 

7 

( 一 1) mnA2 — (3%(— 2)*n)/4 + kroneckerDelta(n, 0)/4 


可 见 ,变换 结果 为 


fi (kT) = DJ fCERTIOG— ET), fel(kT) = 0.5(— 1)*—0.75(— 2)* 


天 一 站 


7.2 数值 积分 


求 国 数 数 人 积分 MATLAB 限 数 调用 如 下 : 

(1) S 二 quad('fname',asb,tol,trace)。 自 适应 Simpson 数值 积分 法 。 
' (2) S 一 quadl(C'fname'yaybytol,'trace)。 目 适应 Newton-Cotes 数值 积分 法 。 

说 明 : 

(1) 输入 参数 fname 是 被 积分 图 数 表 达 式 字符 串 或 图 数 文 件 名 。 

(2) 输入 参数 ac,p 分 别 表 示 积 分 上 下 限 。 

(3) 输入 参数 tol 用 来 控制 积分 精度 。 轩 认 时 取 tol 王 0. 001。 

(4) 输入 参数 trace, 在 取 工 则 用 图 形 展 开 积 分 过 程 , 取 0 则 无 图 形 。 黑 认 时 ,不 显示 

(5) quadl(Oy) 上 比 guad() 有 更 高 的 积分 精度 。 但 无 论 quadl() 还 是 quad() ,都 不 能 处 理 
可 积 的 "“ 软 襄 异 点 ”。 


2 
〖【 例 7-133 设 f(x) 一 e sin(Czr 十 0. 4r)， 求 一 | (xr) dr, 
J 0 
(1) 建立 被 积 图 数 文 件 ,程序 如 下 : 
function y= beij(x) 


y= exp( ~ x) * sin(x+0.4x pi); 
end 


/ (2) 把 函数 文件 存 人 当前 路 径 下 ,在 MATLAB 命令 窗口 调用 该 函数 文件 如 下 : 


clc,clear,close all 
S= quad('beij', 0,1 x pi) 


了 
加 方 
0.6573 : 

求 

人 


【 例 7-1431 分 别 用 quad() 和 quadl() 曙 数 求 S 一 | eadz 的 近似 值 , 并 在 同一 积分 


精度 下 ;比较 被 积 商 数 被 调用 的 次 数 。 

为 了 统计 被 积 晴 数 被 调用 的 次 数 , 可 在 被 积 孙 数 文 件 中 定义 一 个 全 局 变量 ,每 调用 
一 次 ,全 局 变量 加 1。 编 程 如 下 : 

1) quad() 


clc,clear ,close all 

global num; 

num=0; 

format short 

YL = quad( yt',0,3,1le— 6,1) 


IIUIU 


运行 程序 ,输出 结果 如 下 : 


Yl = 
2.7007e+ 03 


2) guadlt ) 


clc,clear ;close all 

global num; 

num= 0; 

format short 

YL = quadl(''vyt',0,3,le— 6,1) 


IIUIU 


运行 程序 :输出 结 采 如 下 : 


YL = 
2.7007e+ 03 


可 见 ,quad1() 函数 调用 被 积 函数 的 次 数 为 20, 而 quad() 函数 调用 次 数 为 110 次 , 因 
此 quadl() 图 数 一 定 程度 上 优 于 quad() 。 
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7.3 微分 方程 的 数值 解 


求解 微分 方程 的 数值 解 弟 用 的 MATLAB 了 轴 数 调用 如 下 : 


[t,x|] = ode23( 'xprime', t+0,+tf,x0,tol,trace) 
[t,x|] = ode45('xprime',t0,tf,x0,tol,trace) 


[t,x] = ode23('xprime', [tO0, tf ],x0,tol,trace) 
[七 , x] ode45('xprime', [tO, tf 1], x0,tol, trace) 


说 明 : 

(C1) 两 个 指令 的 调用 格式 相同 , 均 为 Runge-Kutta 法 。 

(2) 该 指令 是 针对 一 阶 篆 微 分 设计 的 。 因 此 :假如 待 解 的 是 高 阶 微分 方程 ,那么 它 必 
先 演 化 为 形 如 之 = 7Cz,O) 的 一 阶 微分 方程 组 , 即 * 状 态 方程 ”。 

(3) xprime 是 定义 jz:b 的 图 数 名 。 该 图 数 文件 必须 以 工 为 一 个 列 回 量 输 出 ,以 +， 
zx 为 输入 参量 (注意 输入 变量 之 间 的 关系 , 先 “时 间 变量 ”后 “状态 变量 ”) 

(4) 输入 参量 t。 和 ty 分 别 是 积分 的 起 始 值 和 终止 值 。 

(5) 输入 参量 x 为 初始 状态 列 向 量 ， 

(6) 输出 参量 + 和 工分 别 给 出 “时间” 向 量 和 相应 的 状态 回 量 。 

(7) tol i 可 上 默认。 默认 时 ,ode23 默认 tol 二 1.e 一 3; ode45 默认 tol 一 
1.e—6。, 

(8) 输入 参量 trace 控制 求解 的 中 间 结 打 是 否 显 示 ,可 默认 。 默 认 时 ,于 认 为 tol 一 0， 
不 显示 中 辐 结 果 。 

(9) 一 般 地 ,两 者 分 别 采用 自 适应 变 步 长 ( 即 当 解 的 变化 较 慢 时 采用 较 大 的 步 长 ,从 
而 使 得 计算 速度 快 ; 当 解 的 变化 速度 较 快 时 步 长 会 日 动 地 变 小 ,从 而 使 得 计算 精度 更 高 ) 
的 二 ,三 阶 Runge-Kutta 算法 和 四 ,五 也 Runge-Kutta 算法 ,ode45 比 ode23 的 积分 分 有 段 
少 ,而 运算 速度 快 。 


1| 


| ee 
4 1) 的 数值 解 ,并 与 解析 人 解 y (2?) 一 
I 


Vt 十 1 十 1 相 比 较 。 编 程 如 下 : 


【 例 7-153] 求 初 值 问题 


Clec,clear, Close all 


tD= 0; 竺 初 她 和 值 
tE = TO 竺 终止 值 
Y0 = 2; 当初 始 值 


[t, ¥] = ode23(°£",[t0 tE], YO0) 
vi = sgqrt(t++1)+1; 

close all 
plot{(t,y,'—Ir','lJinewidth',2) 
hold on 


plot(t, yl, 'b——','linewidth',2) 


legend( ' 数 值 解 ', ' 解 析 解 ') 分 

运行 程序 ,输出 结果 如 下 : 求 

解 

一 Yl = 
z2.0000 zz.0000 
2.1490 2.1489 
2. 3929 2 21 
2.6786 2.6165 
2.9558 2 nl 
3.1988 3.1333 
3.4181 3.4105 
3.6198 3.6097 
3.8079 3.7947 
3.9849 3.9683 
4.1529 4.1322 
4.3133 4.2879 
4.3430 4.3166 


输出 图 形 如 图 7-2 所 示 。 


| 


Ln 


数值 解 
- -一 解析 解 


4.0r 


3.0 


-用 | 2 2 4 3 0 i 8 0 | 心 
图 7-2 数值 解 与 解析 解 比较 周 
【 例 7-16】 如 求解 著名 的 Van Der Pol 方程 x 十 (x 一 1)zxz 十 X= 二 0 的 数值 解 并 绘制 其 
时 间 相 应 曲线 和 状态 轨迹 图 。 
首先 令 zl 一 工 ,zs 一 工 ,把 工 十 (zz 一 1) 工 十 zz 一 0 写成 状态 方程 如 下 : 


| 本 — Cl 一 XE) 元] 二 


X22 Xl 


编写 纤 


数 文 件 如 下 : 


第 第 1 种 方式 


function xdot = vpa(t, x) 
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xdot = zeros(2,1); 第 初始 化 ,二 元 零 向 量 
xdot(1) = (1 — x(2)"*2) x x(1) — x(2); 
xdot(2) = x(1}); 

多 第 2 种 方式 

function xdot = vpa(t, x) 

xdot(1) = (1— x(2)*2) % x(1) — x(2); 
xdot(2) = x(1); 

Xdot = xdot'; 

第 第 3 种 方式 

function xdot = vpa(t, x) 

xdot = [(1— x(2)*2) x x(1) — x(2) ;x(1) ]; 


clc,clear,close all 


tO0=0; 向 初始 值 
EF — 20 秆 终止 值 
xz0 = [0,0.25]; 币 初始 值 
[t,x] = ode23('vpa', [tO tf],x0):; 
figure(1), 


plot(t, x( -i | a Ep r') 
legend(' 迷 度 ', ' 位 移 ') 

figure(2), 

plot(x{(:,1),x(:,2)}), linewidth', 2); 


运行 程序 ,输出 结果 如 图 7-3 和 图 7-4 所 示 。 


0 2 4 6 ££ 10 12 14 16 i18 20 = -3 -1 0 | 2 3 
图 7-3 位移 .速度 图 形 图 7-4 状态 轨迹 图 


对 于 二 阶 和 党 微分 方程 为 
y= f(xyy), larb 
当 f(x,ysyYy ) 关 于 v,y 为 线性 时 , 即 f(z,yyyy)= 二 pr)y 十 g(xz)y 十 rCz), 此 时 
(6. 1) 变 成 线性 微分 方程 : 
y— plr)y — gry 一 rz，as 工 挟 8 
对 于 上 述 方 程 , 其 边界 条 件 有 以 下 三 类 : 
《1) 第 一 类 边界 条 件 为 


yl(a) 一 aa yo 一 有 
当 a 一 0 或 者 8 二 0 时 称 为 齐 次 的 :否则 称 为 非 齐 放 的 。 
(2) 第 二 类 边界 条 件 为 
y (a) 一 a y (5) = 8 
当 a 一 0 或 者 8 二 0 时 称 为 齐 次 的 ,否则 称 为 非 齐 次 的 。 
(3) 第 三 类 边界 条 件 为 
y(Ca) 一 aoy (a) =a, yp)HBoy (po) 一 应 
其 中 ,ao 三 0,Bo 三 0,ao 十 pp 二 0, 当 ao 一 0 或 者 记 = 王 0 时 称 为 齐 次 的 ,否则 称 为 非 齐 次 
的 。 上 述 微 分 方程 附加 上 第 一 类 、 第 二 类 .第 三 类 边界 条 件 ,分 别称 为 第 一 、 第 二 、 第 三 边 
值 问 题 。 
【 例 7-17 了 求解 微分 方程 组 (Lorenz 模型 ) : 
[2 =— Bri(t) + zz (1)x3(t) 


第 
总 
微 
分 
广 
程 
求 


Xz (t) =— orzs lt) ors (it) 
es =— ZX1(t) X(t) ors (ft) — ra(t) 
该 方程 是 非 线 性 微分 方程 ,所 以 不 存在 解析 解 ,只 能 用 数值 解法 求解 。 设 其 中 参数 
的 值 分 别 是 8 二 8/3,o 二 10 ,0 二 28, 初 值 设 为 zr1(0) 二 Xs(0) 二 XT3(0) 二 @。 
编写 图 数 文 件 lorenzeq.m 如 下 : 


function xdot = lorenzeql(t, x) 
xdot =[ — 8/3 x% x(1) +x(2) ¥ x(3); — 10% x(2) +10x% x(3); — x(1) x x(2) + 28 x x(2) — x(3)]; 


主 程序 如 下 : 


clc,clear,close all 

t final = 100;x0= [0;0;le— 10]; 

[t,x] = ode45('lorenzeq', [0,t final |],x0); 

plot{(t, x) ;figure; 

plot3(x{(:,1),x(:,2),x(:,3));axis([10,42, - 20,20, — 20, 25]); 


运行 该 程序 ,输出 该 方程 的 数值 解 的 图 形 如 图 7-5 和 图 7-6 所 示 。 


30 


0 10 20 30 40 50 60 70 80 90 100 
图 7-5 Lorenz 模型 数值 解 
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图 7-6 ”Lorenz 模型 三 维 图 形 


改动 其 中 参数 和 初 值 设 定 ,经 过 MATLAB 数值 计算 , 日 ] 以 发 现 Lorenz 方程 解 的 亚 
化 规律 。 
首先 ,建立 函数 文件 如 下 : 


function xdot = lorenzeqg(t, x) 
xdot =| — 8/3 x x(1) +x(2) x x(3);— 10x% x(2) + 10 x x(3); — x(1) x x(2) + 28 * x(2) — x(3)]:; 


编写 主 程序 如 下 : 


global SIGMA RB 

SIGMA= 10.; R= 28.; B= 8./3.; 

x0 = [10 10 101]; 

tO = 0; tf = 40; 

t1c 

[tout, xout] = ode45('l]lorenzeq', [tO0, tf], x0); 
toc 

figure(l1 ); 

hp = plot3(xout(:,1), xout(:,2), xout(:,3)); 
set(hp, 'LineWidth',0.1):; 

box on; 

xlabel( 'x', 'FontSize', 14); 

vlabel('y', 'FontSize', 14); 

zlabel( 'z', ' FontSize', 14):; 

set(gca, 'CameraPosition', [200 -一 200 200], 'FontSize',14):; 


运行 结 采 如 下 : 

Elapsed time is 0.173607 seconds 

运行 得 到 的 图 形 如 图 7-7 所 示 。 

绘制 微分 方程 实 一 zy,y(0) 一 0. 4 的 斜率 场 , 并 将 解 曲 线 画 在 图 中 ,观察 斜率 场 和 解 
曲线 的 关系 。 


clc,clear,close all 


40 


60 —20 


图 7-7 Lorenz 方程 解 变化 规律 
编写 向 分 方程 图 数 文 件 如 下 : 


function dy = zxvy(x,v) 
dy = XX. ¥ YY; 
全 了 过 


编写 主 程序 如 下 : 


clc,clear,close all 

clf,clear 第 清除 变量 
a=0;b=4;c= 0;d= 4;n= 15; 

[X,Y] = meshgrid(linspace(a,b,n),linspace(c,d,n)); 村 生成 区 域 中 的 网 格 


z= X. xY; 秆 计 算 斜 率 函 数 

Fx = cos(atan(X. x Y));Fy= sqrt(1 - Fx.*2); s 计算 切线 斜率 和 拓 量 
quiver(X,Y,Fx,Fy,0.5),hold on,axis([la,b,c,d]) 委 在 每 一 网 格 点 画 出 相应 的 斜率 和 失 量 
[x, ¥] = oded5('zxy',[0,4],0.4); 多 求解 微分 方程 

Blo ww) 种 画 解 轨 线 


运行 程序 得 一 阶 微分 方程 的 冬 率 场 和 解 曲 线 如 图 7-8 所 示 。 
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图 7-8 和 斜率 场 
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7.4 微 积 分 运算 


数值 积分 是 一 种 十 分 基础 而 且 重 要 的 运算 。 数 值 积分 可 用 于 计算 解析 定义 的 旺 数 
的 积分 :也 可 以 计算 以 列表 形 了 式 给 出 的 图 数 的 积分 :其 基本 厚 理 是 采用 多 项 陈 近 似 原 上 明 
数 : 然 后 用 该 多 项 陈 的 积分 近似 原 果 数 的 积分 。 


7.4.1 龙 贝 格 积 分 法 


龙 贝 格 积 分 法 是 用 里 查 条 外 推算 法 来 加 局 复合 梯形 求 积 公式 的 收 伍 速度 , 它 的 算法 
如 下 ,其 中 Ts 是 一 系列 通 近 原 定 积分 的 龙 贝 格 积 分 值 。 
Cl) 计算 
To 一 2 [fCa) : 壳 的 】 
(2) 对 有 一 1,2,3,…， 计 算 下 列 各 步 : 
《下 一 已) 


下 人 Ez 了 了 全 | b 二 hn | 人 
2 2 +=1 py 


) ] 


对 1 一 ,2 ,大 和 =k,kC— Ls Ny 


(3) 精度 控制 。 
表 7-1 龙 贝 格 积分 计算 


、 人 a , | , Pe 
随 着 计算 步 台 的 增加 ,TY 越 来 越 逼近 积分 | /Cz)dz。 下 面 是 用 Th” 来 逼近 
| 7cz )dz 的 MATLAB 代码 。 
在 MATLAB 中 编程 实现 的 龙 帆 覆 积 分 法 的 图 数 为 Roberg() 。 
功能 : 龙 贝 格 积 分 法 求 图 数 的 数值 积分 。 
调用 格 陈 : 
[I, step] = Roberg(f,a,b, eps) 


其 中 ,TT 为 积分 值 ; step 为 积分 划分 的 于 区 则 次 数 ; 六 为 限 数 名 ; a 为 积分 下 限 ; 5 为 
积分 上 限 ; eps 为 积分 精度 。 


兴国 党 芋 信 人 各 党 乃 ----------- ee SEE EAE : 


【 例 7-18】 利用 龙 贝 格 积分 法 求解 积分 | zzdz。 


龙 贝 格 积 分 的 MATLAB 代码 如 下 : 
MATLAB 命令 窗口 中 输入 下 列 命令 : 


MATLAB 科 学 计算 
由 龙 贝 格 积 分 法 可 得 到 
1 
请 rdr = 0.6667 


【 例 7-19〗 利用 龙 贝 格 积分 法 求解 积 分 | -Snz dx。 


0 Slr -TT COSIT 


在 MATLAB 命令 窗口 中 输入 下 列 命 令 : 


>> [gq,s8] = Roberg('sin(x)/(sin(x) + cos(x))',0,1) 
q = 
0. 3383 
0 
.3 


由 龙 贝 格 积 分 法 可 得 到 
上 Sinr dr 和 -0.3383 


oo Sin 并 十 COS 工 


目 适 应 积分 法 是 一 和 下 数 
杰 化 剧烈 的 地 方 增多 市 点 ,而 在 被 积 明 数 变化 平缓 的 地 方 减 少 市 点 。 因 此 它 是 一 种 不 均 
可 区 间 的 积分 方法 。 

按照 子 区 间 上 的 积分 方式 它 可 以 分 为 目 适 应 芋 普 条 积分 法 和 目 适 应 梯形 积分 法 。 
授 第 来 用 前 者 作为 子 区 则 的 积分 方式 。 

目 适 应 积分 法 的 基本 步骤 如 下 : 

(1) 将 积分 区 间 [a.5] 分 成 两 个 相等 的 1 级 子 区 间 [aa 入 | 和 E 十 地 ,a | 日 
不 一 0 一 忆 。 

(2) 在 上 述 两 个 1 级 子 区 间 上 用 辛普森 积分 得 到 积分 Tia4+4 和 Ts 站 4,ath。 

(3) 将 子 区 间 区 Ee 人 | 分 成 两 个 相等 的 2 级 子 区 间 区 ,a 十 元 ] 和 [a 十 和 ‘a kb 

(4) 采用 辛 普 钦 积分 计算 得 到 

Tavat$ 一 Tavat 筷 i Te 二 得,o+ 生 


C5) 比较 [加 4 和 T5244 ,如果 T5344 一 1534$ | 二 10X 握 ,其 中 为 整体 积分 所 需 ; 


‘ 髓 细 分 ; 否则 了 就 需 


度 , 则 认为 子 区 间 上 | aa 区 去 | 上 的 积分 ID244 已 达到 所 需 精度 ,不 需要 
要 再 细 分 ,对 每 个 2 级 子 区 间 做 同样 的 判断 。 
1 级 子 区 间 | a 十 分 ,a 二 h | 的 操作 过 程 完全 与 上 面相 同 。 


在 MATLAB 中 编程 实现 的 目 适 应 羊 普 条 积分 法 的 纤 
功能 : 目 适 应 羊 普 条 积分 法 求 国 数 的 数值 积分 。 


类 为 Simpson()。 


调用 格式 : 


工 = Simpson(f,a,b,eps) 


其 中 :了 为 图 数 名 ; a 为 积分 下 限 ; 2 为 积分 上 限 ; eps 为 积分 精度 ; 工 为 积分 值 。 


自 适应 辛普森 积分 的 MATLAB 代码 如 下 : 


function 工 = Simpson(f,a,b,eps) 
委 自 适应 辛普森 积分 法 
千 王 :函数 名 
竺 忌 : 积分 下 限 
向 b: 积分 上 限 
当 eps: 积分 精度 
和 I: 积分 值 
if(nargin == 3) 

eps= 1.0e— 4; 
end:; 
= 5 eps,; 
I= SubSimpson(f,a,b,e): 
end 


function q= SubSimpson(f,a,b,eps) 
QA= IntSimpson(f,a,b,1,eps); 
QLeft = IntSimpson(f,a, (a+b)/2,1,eps); 
QRight = IntSimpson(f, (a+ b)/2,b,1,eps); 
if(abs(QLeft+ QRight 一 QA)<= eps) 
可 = QA; 
el]se 
可 = SubSimpson(f,a, (a+ b)/2, eps) + SubSimpson(f, (a+ b)/2,b, eps); 
end 


end 


function [I,step|] = IntSsimpson(f,a,b,tvype, eps) 
if(type == 3 && nargin == 4) 

disp(' 缺 少 参数 !'); 
end 
I=0.; 
I=((b—-a)/6) x (subs(svym(f),findsvym(svm(f)),a} 十 … 
4x subs(sym(f),findsym(sym(f)),(a+b)/2)+ -. 
subs(sym(f),findsym( sym(f)),b)); 


SeepC 1 
end 
1 
【 例 7-20] 计算 和 分 | TSINTdT , 
J 0 


在 MATLAB 命令 窗口 中 输入 下 列 命令 : 


>> [gqs|] = Simpson( 'x* sin(x}',0,1) 


ds = 
sin(1)/12 + sin(1/2)/12 + sin(1/4)/12 + sin(3/4)/4 


秆 并 归公 式 


了 


十 二 


四 
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>> vpal( qs) 
ans 二 
0.30110139689471874472686373500291 


所 以 由 目 适 应 华 普 和 森 积 分 公 去 可 得 到 


1 
| TSINnrdr 2 0.3011 
0 


【 例 7-21〗 利用 自 适应 辛普森 积分 名 EN 
1 sinz a 


在 MATLAB 命令 窗口 中 输入 下 列 命令 


>> 9 = Simpson('1/(sqrt(x) + sin(x}))',1,2) 


q = 
1/(6x (sin(1) + 1)) + 2/(3x (sin(3/2) + (2°*(1/2) %3°(1/2))/2)) + 1/(6x# (sin(2) + 2 
*(1/2))) 

>> vpal(q) 

三 站 二， 王 

0. 46223549992279227348696449398806 


由 目 适 应 蔷 普 条 积分 公式 可 得 到 


| I = 0. 4622 
1 Sin 二 Vx 


\ 目 适 应 羡 普 和 多 积 分 应 用 十 分 广泛, 不定 被 积 冰 数 多 复 洋 , 它 部 能 快速 地 得 到 局 精度 
的 结 来 。MATLAB 中 的 积分 函数 quad 就 是 采用 的 和 月 适应 竺 普 森 积分 方法 。 


7.4.3 样 条 男 数 求 积 分 
MATLAB 的 样 条 工具 箱 中 提供 了 求 样 条 上 盟 数 的 积分 图 数 fnint()。 畏 数 fnint( ) 的 
常见 用 法 如 下 : 


可 = fnint(Y) 


它 表示 求 取 样 条 函数 Y 的 积分 
在 用 函数 fnint 求 积 分 之 前 ,必须 用 样 条 工具 箱 中 的 函数 csape() 对 被 积分 函数 进行 
样 条 插值 拟 合 . 


【 例 7-22]】 Waige 
/ 在 MATLAB 命令 窗口 中 输入 下 列 命令 


X= 四:0 .1 :3 
‘ y= sin(x); 


Y= csape(x, Yr 'second', [0, 0]) 币 对 被 积 函 数 进 行 样 条 播 值 拟 合 
q= fnval(fnint(Y),3) 当 样 条 操作 函数 fnval 计算 在 给 定点 处 的 样 条 函数 值 


q =1.9900 


所 以 由 样 条 积分 可 得 到 


半 
| sinrdr 2 1. 9900 


7.5 动态 微分 方程 模型 


动态 微分 模型 鞭 型 的 如 种 群 竞争 模型 ,种 群生 存 期 间 有 着 出 生 、 死 亡 . 迁 入 / 迁 出 等 
问题 ,因此 种 群 数量 较 难 确定 ,其 种 群 竞争 的 数学 模型 只 能 通过 反复 的 修正 ,不 断 地 完 
善 ,从 而 更 加 接近 实际 。 

设 有 甲 . 乙 两 种 群 , 当 它 们 独 上 日 生存 时 数量 演变 服从 Logistic 规律 ,如 下 式 所 示 。 


(i 


式 中 ,zt yi) 分别 为 甲乙 两 种 群 的 数量 ; rr 为 它们 的 固有 增长 认 ; m1 、nz 为 
它们 的 最 大 容量 。 

当 两 种 群 在 同一 环境 中 生存 时 ,它们 之 间 的 一 种 关系 是 为 了 和 争 生 同一 质 源 而 进行 苋 
争 。 考 察 由 于 乙 消 耗 有 限 的 和 资源 对 甲 的 增长 产生 的 影 响 ,可 以 合理 地 将 种 铬 甲 的 方程 修 
改 为 


dz 元 Y 
nzrz(l— 三 $1 和) 
dz nz( 1 1 | sa 


式 中 ,si 的 含义 是 : 对 于 供养 甲 的 资源 而 言 ; 单 位 数量 乙 ( 相 对 于 nz) 的 消耗 为 单位 
数量 中 (相对 x ) 消 耗 的 si 倍 。 
类 似 地 :如 采 甲 的 存在 也 影响 了 乙 的 增长 , 乙 的 方程 应 改 为 


式 中 ,sz 的 含义 是 : 对 于 供养 乙 的 资源 而 言 : 单 位 数量 甲 ( 相 对 于 m1) 的 消耗 为 单位 
效 量 乙 ( 相 对 nz) 消 耗 的 sz 倍 。 

当 给 定 种 群 的 初始 值 

xX(0) 一 Xo YUN 一 yo 

及 参数 ni rz ,51、5z 7 za 后 ,可 确定 两 种 群 数量 的 变化 规律 。 

(1) 设 记 =e 二 1 m1 二 ns 二 100,51 一 0.5,s 一 2,zo 一 加 一 10, 计 算 (1)、y(2);, 画 出 它 
们 的 图 形 及 相 图 zi 、y() ,说 明 时 间 zt 充分 大 以 后 工 (1) 、y(?) 的 变化 趋 搜 。 

对 于 微分 方程 的 求解 ,首先 建立 微分 方程 隐 数 ,多 数 情 况 下 ;用 数值 解 代替 代数 解 进 
行 方 程 的 模拟 。 自 定义 种 群 国 数 程序 zhongqun() 如 下 : 


当 自 定义 种 群 函数 

function dy = zhongqun(t, vy) 

syms rl] r2 sl sz2 nl 

当 工 工 赋 子 不 同 的 套数 时 ,有 不 同 的 解 
rl 二 ;r= 1];: 

nl = 100;n2 = 100; 
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sl=0.5;S2= 2;: 

dy = zeros(2,1); 

dy(1) = rlx*y(1)* (1—y(1)/nl— sl * y(2)/n2); 

dy(2) =r2x v(2) * (1— s2x* vy(1)/nl-— v(2)/n2); 

多 注 解 : 在 此 函数 中 ,改变 rl1.r2.nl、.n2、sl、s2 的 值 ,达到 相关 和 要求 


针对 题目 中 已 知 的 初始 条 件 , 编 写 相 应 的 MATLAB 脚本 文件 程序 ,运行 结果 如 
图 7-9 和 图 7-10 所 示 。 


P| 一 | ; r=1; s1=0.5; s3=2; m1=100; ns=100; xo=10; yo=10,; 
120 和 一 一 一 一 一 一 一 一 一 


100 


Wn) 


0 ss 10 15 20 25 30 35 40 45 50 
图 7-9 zz0) 和 yw0) 的 变化 趋势 图 图 7-10 解 曲 线 


由 图 7-9 和 图 7-10 可 知 在 :上 一 10 时 ,x 达到 稳定 值 100,y 达到 稳定 值 0。 
结论 : 时 间 t 充分 大 以 后 x (1) 、y(2) 的 值 稳定 在 X= 二 100,y= 二 0。 
z(D .y(D 的 变化 趋势 图 程序 如 下 ， 


竺 绘制 当 Il=1;r2=1;nl=1007;n2=100;s1=0.5;s2=2 时 的 函 教 图 属 
>> x0 = 10;y0= 10; 

options = odeset('RelTol',le— 4,'AbsTol',[le—41le—5|); 

[T,Y|] = ode45('zhongqun', [0 501],[x0 Yo options) ; 

grid on 

axis equal 

plot(T, Y(:,1), bo ,TY(:,2),'r— ") 

title('rl =1;r2=1;sl =0.5;s2= 2;nl = 100;n2= 100;x0=10;y0= 10;') 
h = legend('x(t)', 'y(t)',2); 


解 曲线 程序 如 下 : 


和 绘制 曲线 向 量 解 曲线 

> SYMS Il r2 sl s2 nl 
rl=1l;r2=1;sl =0.5;s2= 2;nl =100;n2= 100; 
Xmin=0; 

Xmax = 140: 

Ymin=0; 

Ymax = 100; 


n= 50; 

千 计 算 切 线 矢量 分 
>> [X,Y| = meshgrid(linspace(Xmin, Xmax,n),linspace(Ymin, Ymax, Nn)):; 方 
>> Fx=Il1. x X. * (1—X./nl- sl. xY¥./n2); 程 
Fy=Ir2. xY. x(1— s2. * X./nl—Y. /n2): 


Ex= Fx. /(sqrt(Fx.*2+Fy.*21+1)); 

Fy= Fy./(sqrt(Fx.^2+Fy.2+1)); 

和 求解 微分 方程 

>> options = odeset('RelTol', le 4,'AbsTol',[le—-4 le 一 5]); 
>> [Tl1,Y1] = ode45(( 四 zhongqun [0 S50],[10 10],options); 
>> 名 绘制 儿 率 场 

hold on 

grid on 

box on 

axis( [Xmin, Xmax, Ymin, Ymax | ) 

quiver(X,Y,PFx,Fy,0.5); 

>> 要 绘制 解 曲线 

PlettYl(:， 1) YLL:，2)， 可 LIneWidth' 2) 


(zz) 改变 rlasT2 sl ,M2 vo、 Yo ,维持 1] SY2 不 亚 ;在 此 ,给 出 rr1 一 .72 一 .1 21 一 00， 
?zz 一 120,zo 一 一 10 的 函数 图 像 及 产 一 0. 9,r 一 1.5, 轨 一 500:,7mz 一 800,zo 一 yo 一 10 的 

同 (1) 中 ,改变 初始 值 ,运行 程序 , 结 末 如 图 7-11 和 图 7-12 所 示 。 其 中 ,图 7-11 所 示 
为 门 一 1.2,r 一 1.1,m 一 200,a 一 120,zo 一 yo 一 10 的 函数 图 像 ; 图 7-12 所 示 为 i 一 
0.9:,rz 一 1.5,72 一 500,72z 一 800,zro 一 yo 一 10 的 明 数 图 像 。 


Fi=1.2: rs=1.1: s1=0.5: $3=2: m=200; ns=120: xo=10; Ww=10; 71=0.9, ro—1.3; s1=0.3; 5 一 2 #1=300; 7 一 300: xo 一 10; yo—=10; 


120 120 
100 Le 
380 
8&0 
0 
50 
40 
[0) 
20 0 
20 0 
册 四 本 ,= 1 一 20 器 = ~ 1 
5 IO 1 20 25 30 3 40 45 $0 0 5 10 15 20 253 30 35 40 45 530 
图 7-11 门生 1.2,rm 一 1.1 时 图 像 图 7-12 产生 0.9,r 一 1.5 时 图 像 


| rm 一 .27rr 一 ] .1 时 ;程序 如 下 : 


当 自 定义 种 群 函数 
function dy = zhongqun(t, vy) 
syms Il1 r2 sl s2 nl 


M3 
1 Ee re er Ee ge Ee eh ee ee ee 
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当 工 卫 赋 了 予 不 同 的 参数 时 ,有 不 同 的 解 
rl=1.2:r2=1.1; 

nl = 200;n2 = 120; 

sl = 0.5;Ss2= 2.; 

dy = zeros(2,1):-. 

dy(1)= rlx v1)* (1—- vy(1)/nl- sl x y(2)/n2); 
dvy(2) =r2#x y(2)* (1— s2#* vy(1)/n1l— vy(2)/n2); 


运行 的 脚本 文件 程序 如 下 : 


当 保持 sl1、s2 不 变 , 改变 其 他 变量 

> XD = 10 ;v0= 10; 

options = odeset( 'RelTol',le— 4,'AbsTol',[le—-4 1e 一 5]); 

[T,Y] = ode45('zhongqun', [0 501],[x0 yo] options) :; 

grid on 

axis equal 

plot(T, Y(:,1),'b— ,TY(:,2),'r—") 

title('rl =1.2;r2=1.1;sl] =0.5;s2= 2;nl = 200;n2= 120;x0 = 10;Yy0= 10;') 
h = legend( 'x(t)", 'y(t)",2); 


当 六 一 0.9,rz 一 1.5 时 ,程序 如 下 : 


竺 自 定 义 种 群 函数 

function dy = zhongqun(t, y) 

svyms Il1 工 之 sl sz nl 

竺 工 汪 赋予 不 同 的 参数 时 ,有 不 同 的 解 
rl=0.9;r2=1.5 

nl = 500;n2 = 800; 

sl=0.5;Ss82= 2; 

dy = zeros(2,1); 

dy(1) = rlx vy(1) x (1— vy(1}/nl— sl x y(2)/n2):; 
dy(2) = r2x vy(2) x (1—- s2x* vy(1)/nl- vy(2)/n2); 


运行 的 脚本 文件 程序 如 下 : 


>> x0 = 10;y0= 110; 

options = odeset('RelTol',le— 4,'AbsTol', [Le 一 41e 一 5|); 

[TY] = ode45('zhongqun', [0 50], [xzo vo],options); 

grid on 

axis equal 

plot(T, Y(:,1), "bo ,TY(:,2),"r— ") 

title('rl =0.9;r2=1.5;sl1] =0.5;s2= 2;nl = 500;n2= 800;x0= 10;y0= 10;') 
h = legend('x(t)', 'y(t)', 2); 


当 改 变 产 .rz sn1 snz 、To、yo ,维持 siss 不 变 , 种 群 x 将 占 优势 地 位 ,而 种 群 y 变 为 0。 

综合 结论 : 改变 r.n 和 初始 值 , 甲 . 乙 种 群 的 最 终 稳定 状态 不 会 改变 ,都 是 种 群 x 达 
到 环境 最 大 承载 值 , 而 种群 y 变 为 0。 参数 rr.n 和 初始 值 的 改变 仅 会 影响 达到 稳定 的 速 
度 ,不 会 改变 优势 种 群 z 的 优势 地 位 , 即 最 终 的 稳定 状态 情况 。 


在 人 一 1.5,s 一 0.7, 绘 出 因数 图 像 如 图 7-13 所 示 。 


m=]; rs=1; 8 二 1.3: 8 一 1.7: m=100; ns=100: w=10: w=10: 分 
程 
求 

100 
解 


8U 


OU | 


图 7-13 函数 图 像 


在 图 7-13 中 ,在 1 二 20 时 ,y 达到 最 大 容量 稳定 值 100 ,种 群 x 达到 在 范 争 中 变 为 零 。 
当 5 小 而 5 大 时 (si 与 s。 相差 较 大 时 ,9 一 1,s: 全 1) , 乙 消 耗 甲 的 资源 少 , 乙 对 甲 影响 小 ， 
同时 甲 消 耗 乙 的 换 源 多 :所 以 甲 对 乙 影 啊 大 ,此 时 乙 处 于 不 利 地 位 : 甲 钼 于 有 利 地 位 ,所 
以 最 后 结果 甲 达 到 最 大 环境 承载 量 , 而 乙 种 群 数 芝 为 0。 

相反 的 , 当 5s1 大 而 sz 小 时 (Cs 与 s 相差 较 大 时 ,二 1 一 1), 乙 消耗 甲 的 质 源 多 , 乙 
对 甲 影 啊 大 ,同时 甲 消耗 乙 的 资源 少 , 所 以 甲 对 乙 影 啊 小 ,此 时 乙 处 于 有 利 地 位 , 甲 处 于 
不 利 地 位 ,所 以 最 后 结 订 乙 达 到 最 大 环境 承载 量 , 而 四 种 群 数 变 为 0。 

当 呈 一 1.5,sz 一 0.7 时 ,程序 如 下 : 


委 自 定义 种 群 函数 

function dy = zhongaqun( 七 ,了 ) 

syms rl1 Iz sl sz nl 

%r.n 赋 了 予 不 同 的 参数 时 ,有 不 同 的 解 
rl=1.5:r2=0.7 

nl = 100;n2 = 100; 

sl=0.5;s82= 2;: 

dy = zeros(2,1); 

dyl1i)= ri) (1— Yl/nl— sl wr(2)/n2); 
dy(2) =r2x%x vy(2) x (1—- s2* vy(1)/nl— v(2)/n2); 


运行 的 脚本 文件 程序 如 下 : 


> X00 = 10;YyY0= 10; 

options = odeset( 'RelTol',le— 4,'AbsTol',[le—-41le— 5|); 

[T,Y] = ode45('zhongqun’', [0 50],[x0 yo] options) :; 

grid on 

axis equal 

plot(T,¥(:,1), bo ',T,Y(:,2),'r— ") 

title('rl =1;r2=1];sl=1.5;s2= 0.7;nl] =100;n2= 100;x0=10;y0 = 10;'") 
h = legend('x(t)"', 'y(t)'",2); 
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7.6 打靶 法 


下 面 以 非 线 性 方程 的 第 一 类 边 值 问题 为 例 讨 论 打 转 法 ,其 基本 原理 是 将 边 值 问 题 转 
化 为 相应 的 初 值 问题 求解 。 
假定 y (a) = 二 t+, 这 里 + 为 解 y(z) 在 x 二 a 处 的 斜率 ,于 是 初 值 问题 为 
fy = f(x,y,y) 
jo 一 a 
ly ta) 三 
令 = 一 多 ,上 述 二 阶 方程 转化 为 一 阶 方程 组 ， 
a 
| 一 三 ( 工 y yy 之 ) 
一 a 
lz(a) 二 ft 
原 问 题 转化 为 求 合 适 的 t+, 使 上 述 初 值 问 题 的 解 y(z: 必 在 x 二 5 的 值 满 足 右 问 边界 
条 件 : 
Vi 一 有 
打靶 法 的 计算 过 程 (e 为 允许 误差 注 的 修改 使 用 线性 插值 方法 ): 
(1) 先 设 一 ,求解 初 值 问题 ,得 到 y(5,to) 二 Bo; 若 |18 一 所 | 去 s, 则 y(zj,to0) (一 0， 
1,… ,2) 为 问题 的 满意 的 离散 解 ,结束 。 
(2) 车 18 一 Bo1>e, 令 1 二 ,求解 初 值 问 题 ,得 到 y(5,41) 二 B1; 若 |8 一 Bi | 之 e; 则 yxy， 
4) 0 二 0,1,…, 加 为 问题 满意 的 离散 解 ,结束 ; 否则 转 下 一 步 。 
《3) 由 线性 插值 得 到 一 般 计 算 公 式 
PT 


yobste) OO— yb te) 

(4) 令 1 二 tr+1 ,求解 初 值 问 题 , 得 到 y(6,titr1) 二 Betri; 硅 |B8 一 Beti | 奎 8, 则 y(xj ,tet1) 
(一 0,1,… :72) 为 满意 的 离散 解 ,结束 ; 否则 转 上 一 步 。 

这 个 过 程 好 比 打 臣 ,th 为 子弹 上 发射 率 ,y(o) 三 8 为 轩 心 ; 当 18 一 详 s 时 则 得 到 解 , 故 
称 打 弛 法 。 

【 例 7-23】 用 打针 法 求 线性 边 值 问题 : 


t Eil ~ 


= 1 yz 一 Tz) 十 ca， XE 1L0.,6| 


在 v(0) 一 1.25,.y(6) 一 一 1. 25,c 二 2,cs 二 2,cs 二 0.8 的 数值 解 ,hh 二 0.5, 并 与 精确 解 比 
较 , 画 出 它们 的 图 形 。 

由 目标 方程 得 gi (x) re (zz) 一 一 本， ga (zz) 一 0.8,a 一 1.25,8 一 一 1. 25。 
由 此 建立 相应 的 函数 文件 如 下 : 


function dyY1 = dydxl (X,Y) 
Cl=2;Cc2=2;7C3=0.8; 


dyYl(1) = Y(2); 

dY1(2) = (cl x X/(1+ XxX”2)) x Y(2) — (c2/(1 + X*2)) x Y(1) + c3; 
dyYl = [dY1(1);:dY1(2)]; 

end 


当 cs 二 0, 编 号 对 应 的 函数 文件 如 下 : 


function dY2 = dydx2 (X,Y) 

Cl = 2;C2 二 2。 

dY2(1) = Y(2); 

dY2(2) = (cl x X/(1 + X*2)) x Y(2) — (c2/(1 + X*2)) x Y(1):; 
dyY2 = [dY2(1);dY2(2)]; 

end 


求 其 精确 解 ,程序 如 下 : 


clc,clear,close all 

当 精确 解 

v= dsolve(l( 'D2y= (2¥% X/(1+X*2)) x Dy— (2/(1+X*2)) xcT+D.SB 'X') 

syms Cl Cz, 

X= [0,6]; 

y= Xx C2+ (1— KX.*2) x Cl — A/5 x X.*2+ B/5 x X. x atan(X) — 2/5 x% log(1 + X.*2) + 2/5 x log(1 
2 

[C1,C2] = solve( 'C1 = 1. 25','6 x C2 — 35*% Cl+99211677038297587/2814749767106560 = -1.25'); 
SYyms X 

v= Xx C2+ (1— XX.^2) x Cl — A/5% X.*2+B/5 x KX. x atan(X) — 2/5 x% log(1 + X.*^2) +2/5 x*# log(1 
+ X.*2). XX. 2 


运行 程序 :输出 结 采 如 下 : 


Y 下 

Cl2xX— Xx ((4xX)/5 — (Bxatan(X))/5) + (2 关 和 XE log(XA^2 + 1) x (X 一 1/X)})/5 + Cl3x 
Xx (XO— 1/X) 

Y= 

[ C1l, 6xC2 — 35x%x C1 + 1638905643197707/2814749767106560] 

TY et 

1. 2088219648217098859769672950885 x XX 一 (2x* log(X*2 + 1))/5 + (4x Xx log(X*2 + 1))/5 
+ (Bx Xx atan(X))})/5 一 2.05 *%* X^2 二 1.25 


编写 相应 的 线性 打 臣 法 程 厅 如 下 : 


function [k, X,Y,wucha,P] = xxdb(dydx] ,dydx2, a, b,alpha, beta, h) 
n= fix((b— a)/h); 

X= zerosinT 1,11: 

CT1 = [alpha, 0]; 

Y= zeros(n+ 1,1length(CT1) ); 

YL = zeros(n+i+1,1ength(CcT]l)})): 


> 
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Y2 = zeros(n+1,length(CcCTl )).; 
=a:h:b; 
Y1(1,:}= Crl:; 
CI2= [0,11]; 
TAI :)— CT2- 
fork=1:n 
kl = feval(dvydx] ,XxX(k),Y1(k,:)) 
x2= XK +h/2;v2= YI(k,::)'+hkl * hy/2: 
k2 = feval(dydx] ,x2, y2); 
k3 = feval(dydx] ,x2, Yl1(k,:)'+k2 * h/2); 
kA = feval(dydxl, X(k) + h,Yi(k,:)'+k3 * h); 
Yl(k+1,:) = Yi(k,:)} +hx (kit2xk2"T2 xk3'+ kA/6, k=k+1; 
end 
u= Yl{(:,1) 
fork=1:n 
kl1 = feval(dvydx2, xX(k),Y2(k, :)) 
x2 = XIK) + h/2;72= YZ(kE,:)'+hkl * hh/2; 
k2 = feval(dvydx2, x2, y2); 
k3= feval(dydx2, x2, Y2(k,:)'+k2 * h/2); 
k4= feval(dydx2, X(k) + h,Y2(k,:})'+k3x h); 
Y2(k+1,:) = Y2(k,:) +hx (kl'+2x kK2'+2 x%k3'+k4')/6,k=k+i+1; 
end 
v= Y2(:,1)} 
Y=u+ (beta—- un+i+1)) x v/v(n+i+1) 
for k=2:n+1 
wucha(k) = norm(Y(k} — Y(k—1)}); k=k+i+1; 
end 
T= Xlinl1): 
Y= Ylnt1,:); 
KEK=1:n+i+1.; 
wucha = wucha(l1:k, :):; 
P= [k',X',Y, wacha’ |; 
plot(X,Y(:,1), ro—— ,X,Y1(:,1), gx —— ,X,Y2(:,1), "mp——") 
X1Label( ' 轴 作证 x'); 
ylabel(' 轴 \it y') 


legend( ' 这 值 问 题 的 数值 解 y(x) 的 曲线 ', ' 初 值 问 题 1 的 数值 解 ul(z) 的 曲线 !，' 初 值 问 题 2 的 数值 


解 v(x) 的 曲线 ') 
title( ' 用 线性 打靶 法 求 线 性 边 值 问题 的 数值 解 的 图 形 ') 


主 程序 如 下 : 


clc,clear,close all 


a= 00. 


alpha= 1.23. 

beta= —1.25; 

Cl 二 Ca 二 C=0.8- 

[k, X,Y, wucha,P] = xxdb( (Ddydxl, (Wd dvydx2,a,b,alpha, beta h), 


hold on 

y=1.2088219648217098859769672950885 x XX 二 1.25— 2.05*% X.^2++ 8B/5 x X. x atan(X) — 2/5 * 分 
log(1+ X.*2) +2/5 xx log(l1 + X.*2). % X.*2- 方 
plot(X, vy,'b—')}, hold off 


legend(' 边 值 问 题 的 数值 解 Y(x) 的 图 形 ', ' 初 值 问 题 1 的 数值 解 u(x) 的 图 形 '，' 初 值 问 题 2 的 数值 解 
解 v(x) 的 图 形 ', ' 边 值 问 题 的 精确 解 y(x) 的 曲线 ') 
上 title( ' 用 线性 打靶 法 求 线性 边 值 问题 的 数值 解 和 精确 解 的 图 形 ') 
n= fix((b— a)/h):; 
fork=1:n+i+1 

wuchay(k) = norm(vy(k) — Y(k)); k=k+1; 


wuchay = wuchavy(l1 :k, :):; 
Pl= |[k',X',y',Y, wuchay' ,wucha' | 
运行 程序 ,输出 图 形 如 图 7-14 所 示 。 


用 线性 打靶 法 求 线 性 边 值 问题 的 数值 解 和 精确 解 的 图 形 
20r | 


- 习 -- 边 值 问 题 的 数值 解 NMx) 的 图 形 

-六 -- 初 值 问题 1 的 数值 解 u(x) 的 图 形 

- 妆 - 初 值 问 题 2 的 数值 解 (x) 的 图 形 
一 一 边 值 问题 的 精确 解 Xx) 的 曲线 。 
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本 章 小 结 


本 章 基 于 微分 方程 求解 ,讲解 了 和 见 的 、 较 简单 的 MATLAB 微分 方程 计算 ,包括 打 
轰 法 ` 微 分 方程 斜 座 场 曲 线 绘制 ,以 及 符号 微分 方程 的 求解 .让 庶 者 初步 掌握 微分 方程 稼 
见 问 题 求解 。 


2 
但 
和 
分 
方 
程 
及 


级 数理 论 是 分 析 学 的 一 个 分 支 , 它 与 男 一 个 分 支 一 一 微 积分 学 一 
起 作为 基础 知识 和 工具 出 现在 其 余 各 分 支 中 。 本 章 主 要 从 微分 方程 
求解 、 级 数 展 开 ( 国 数 的 泰勒 展开 和 傅 里 叶 展 开 ) 和 简单 应 用 问题 出 
发 ,深入 浅 出 地 闸 述 微分 方程 .级 数 、 符 号 变量 的 使 用 。 

学 习 目 标 : 

。 掌握 党 微分 方程 基本 运算 ; 

。 掌握 级 数 展开 以 及 微分 方程 工程 应 用 分 析 ; 

”掌握 MATLAB 求 解 具 体 工 程 案例 技巧 。 


8.1 微分 方程 基本 运算 


当 常 微分 方程 式 能 够 解析 求解 时 ,可 用 MATLAB 符号 工具 箱 中 
的 功能 找到 精确 解 ; 在 第 微分 方程 难以 获得 解析 解 的 情况 下 ,使 用 
MATLAB 的 常 微分 方程 求解 器 solver, 可 以 方便 地 在 数值 上 求解 。 


8.1.1 管 币 分 方程 符号 解 


MATLAB 常 微分 方程 符号 解 的 语法 是 ， 
dsolve( 'equation', 'condition') 


其 中 ,equation 为 常 微分 方程 式 , 即 y = 二 g(x,y), 且 需 以 Dy 代表 
一 阶 微分 项 y ,D2y 代表 二 阶 微分 项 y ; condition 则 为 初始 条 件 。 

晒 数 dsolve() 用 来 解 符号 第 微分 方程 .方程 组 ;如果 没 有 初始 条 
件 , 则 求 出 通 解 ; 如 果 有 初始 条 件 , 则 求 出 特 解 。 

了 商 数 dsolve() 的 调用 格式 如 下 : 

(1) dsolve( 'eqguation')。 给 出 微分 方程 的 解析 解 , 表 示 为 1 的 
了 商 数 。 

(2) dsolve('equation'，'condition')。 给 出 微分 方程 初 值 问 题 的 


和 解 ,表示 为 上 的 果 数 。 


(3) dsolve('equation',，'v')。 纵 出 微分 方程 的 解析 解 , 表 示 为 v 
的 消 数 。 


(4) dsolve('equation'，'condition'，'v')。 给 出 微分 方程 初 值 问题 的 解 , 表 示 为 vv 的 
呐 数 Le] 分 


【 例 8-1】 求 方程 y (2) 二 2at 的 通 解 , 其 中 a 为 常数 。 4 
编写 程序 如 下 及 


clc,clear, close all 
yl = dsolve('Dy=2xaxt', 't') 


运行 程 订 .输出 结果 如 下 : 


wl = 
已 其 七 “也 十 心 2 


【 例 8-2】 求 方程 A Dre | ro ,y(1) 一 2 的 通 解 。 
编写 程序 如 下 : 


clc,clear,close all 
v2 = dsolvel Dy = t/yt yi/t', "vw(1) = 2"', "Et") 


运行 程序 ,输出 结果 如 下 : 


了 之 = 一 
2*(1/2) x* tx (log(t) + 2)^(172) 


: : (x (DD=yD+1, y (=z(2)+1 
【 例 8-3】 求 方程 组 < 的 特 解 。 
二 二 6 


编写 程序 如 下 : 
Clec,clear,close all 
s= dsolve('Dx= y+1','Dy= Xxt+1', x(0) =—2', yy(0) = 0','t'), 


YS.Yr 
下 三 欠 -. 焉 


运行 程序 ,输出 结果 如 下 : 


: [lxl1 syYm |] 
: [1xl sym | 


由 


- exp( —t) x (exp(t) — 1) 


-exp(—t)x (exp(t) + 1) 
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8.1.2 第 微分 方程 数值 解 


求解 微分 方程 的 数值 解 弟 用 的 MATLAB 四 数 调 用 如 下 : 


[t, x|] = ode23('xprime', t0, tf, x0, tol, trace) 
[t, x|] = oded45( 'xprime', t0, tf, x0, tol, trace) 


[t, x] = ode23('xprime', [t0, tf], x0, tol, trace) 

Tt, x] = aded5( "xprime', [t0, tE], x0, tol, trace) 

说 明 : 

(1) xprime 是 定义 有 (zx, 人 ) 的 函数 名 。 该 函数 文件 必须 以 为 一 个 列 向 量 输出 ,以 4， 
z 为 输入 参量 (注意 输入 变量 之 间 的 关系 , 先 “时 间 变 量 " 后 “状态 变量 ”)。 

(2) 输入 参量 t。 和 4 分 别 是 积分 的 起 始 值 和 终止 值 。 

(3) 输入 参量 ze 为 初 妨 状态 列 癌 量 。 

(4) tol 控制 解 的 精度 ,可 默认 。 默 认 时 ,ode23 默认 tol 二 1. e-3; ode45 默认 tol 一 
1. e-b 。 

(5) 输入 参量 trace 控制 求解 的 中 则 结 条 是 否 显 未, 可 歌 认 。 默 认 时 :. 玖 认为 tol 一 0， 
不 显示 中 间 绪 条 。 

【 例 8-4】 绘制 微分 方程 y 一 cosz 十 siny 的 方向 场 . 在 区 间 L0， 20] 上 求解 满足 初 值 
条 件 y(0) 二 1 的 数值 解 , 并 在 回 量 场 中 绘制 数 信 解 的 图 形 。 

由 y 一 cosz 十 siny 编写 函数 文件 如 下 : 


ll 


function dy = Dfunl(t,y) 
dy= cos(t) + sin(y); 
end 


求解 该 函数 的 数值 解 , 编 程 如 下 


Clear 

clc 

options = odeset('RelTol',le— 4,'AbsTol',le— 5):; 
[TY] = ode45( (四 Dtunl, [0 201],1,options):; 

box on 

grid on 

axis equal 

plot(T, Y, linewidth',2) 


grid on 


运行 程序 ,输出 图 形 如 图 8-1 所 示 。 
编写 该 图 效 癌 量 场 中 的 效 值 解 的 图 形 ,程序 如 下 : 


图 8-1 数值 解 


Clear 

Cle 

心 外 王 

秆 确定 绘制 区 域 并 划分 网 格 
AmIin=0; 

Xmax = 20; 

Ymin =— 20; 

Ymax = 20; 

n=15; 

和 计算 切线 笑 量 

[X,Y] = meshgrid(linspace( Xmin, Xmax,n),linspacel( Ynmin, Ymax,n) ); 
饥 

Fx= cos(atan(cos(X) + sin(Y))}); 
[ml,nl| = size(Fx):; 

for i1=1:ml 


for J=1:nl 
if(cos(X) + sin(Y)>0) 竺 夹 角 为 锐角 
Fy(l1, JJ = sqrtll — Fx(21,])."2); 
else 第 卖 角 为 钝 角 


Fy(i,j) = 一 sqrt(l1— Fx(i,j).°2); 
end 

end 
end 
和 求解 微分 方程 
[x, 了] = ode45((@Dfunl,[0,20],0.1).; 
[xl1l,yl1| = oded45( (四 Dtunl ,10, 20 ,4.0) 
[x2,Y2] = ode45( (四 Dftunl, [0.20],， 一 2.0) 
[x3,yY3|] = ode45( (四 Dtun1l 10,20]， 一 4.0) 
当 绘制 斜 牵 场 
hold on 
grid on 
box on 
axis( [Xmin, Xmax, Ymin, Ymax | ) 
quiver(X,Y,Fx,Fy,0.3).; 


245 荔 
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当 绘制 解 曲线 


ploElz vy,. rT— "x vl NX VE A DineWadth’', 2)- 
hold off 


\ 运行 程序 ,输出 图 形 如 图 8-2 所 示 。 


EN 


| 


1 
| 
I 


"Lk 一 


a 


图 8-2 向 量 解 中 的 数值 解 


【 例 8-5〗】 已 知 阿 波 罗 飞 船 的 运动 轨迹 (zx,y) 满 足下 和 面 的 方程 : 
(dz es 人 ee + wp) u(x 一 4 


dz” 1] rz 


dy odr ,AI py 

| di dy ry 7 

: 式 中 

1 — 

\ FA rz = W( 垃 十 17) 十 时 

试 在 初 值 z(0) 一 1.2,z (0) 一 0，y(0) 一 一 1,y (0) 一 一 1.049 353 71 下 求解 ,并 绘制 飞船 
轨迹 图 。 


编写 该 函数 程序 文件 如 下 : 


function dy = Dfun3(t,yvy) 

dy = zeros(4,1); 

$a= 1/82.45 

Sb=1-a; 

' dy(1) = y(2); 

' dy(3) = y(4); 

dy(2) = 2x y(4) +vy(1) — 0.9879 #* (vy(1) + 0.0121)/(sgqrt((vy(1) + 0.0121)*2+y(3)*2))*3 — 
' 0.0121 * (y(1) —0.9879)/sgrt((vy(1) + 0.9879)*2+y(3)*2)"3; 

dy(4) =— 2* y(2) +y(3) — 0.9879 x y(3)/(sgrt((y(1) +0.0121)^2+Y(3)^2))^3 一 0.0121 xy 
(3)/(sqrt( (vw(1)} +0.9879) “2 十 更 3) 2J) 35 


end 


编写 主 盟 数 文件 如 下 : 


Clear; 

I。 

[t,¥] = odel5s('DEun3' [0 70],[100 -1]); 
plot(y(:,1),y(:,3)) 

grid on 


运行 程序 ,输出 图 形 如 图 8-3 所 示 。 


“300 -200 -100 0 100 200 300 
图 8-3 ”数值 解 


8.1.3 条 时 级 数 


右上 因数 f(z) 在 工 二 zxo 点 的 某 一 邻 域内 ,具有 从 工 阶 ) 直到 2 十 1 阶 的 导数 , 则 在 该 
邻 域内 ,图 数 f(z 在 点 工 二 Xo 时 ,项 数 趋 同 无 穷 的 此 级 数 为 
fF (xo) (rt— To j WE (To TO To) 
ea 十 sa 二 
这 个 祖 级 数 叫 作 国 数 太 z) 的 泰勒 (Taylor) 级 数 , 在 MATLAB 中 可 由 上 明 数 taylor 来 
实现 。 其 第 见 的 调用 格式 如 下 : 
(1) taylor({f)。 人 返回 阴 数 的 五 次 各 多项式 近似 ,; 归 数 的 日 这 量 由 肾 数 findsym() 
(2) taylor(Cf,n)。 返 回 2 一 1 次 蝶 多 项 式 , 盯 数 了 了 的 上 月 变量 由 图 数 findsym() 确 定 。 
(3) taylorCf'a)。 返 回 ae 点 附近 的 五 次 蝴 多 项 式 近 似 。 
(4) taylor(Cf:,x)。 返 回 扩 轩 数 的 五 次 蝶 和 多 项 陈 近 似 : 力 数 了 的 自 变 量 指 定 为 xx, 不 是 
由 上 申 数 fndsym() 硝 定 。 


【 例 8-6】 研究 对 象 : fCz) 一 一 szo 一 1。 求 函数 在 指定 点 处 的 震级 数 展开 式 。 
编写 程序 如 下 : 


fr) = fro) df ro) (re ro) + 


上 画 画 画 


Clear; 
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Close all,clc 

syms X 

Fun=1./(x. w (xt3)); 
Tavyfun = tavlor(fun,x,1) 


运行 程序 ,输出 结果 如 下 : 


Tavyfun = 
(21¥% (x — 1})*2)})/64 一 (5 # x)/16 一 (85x% (x — 1)*3)/256 + (341 x (x 一 1)*4)/1024 — 
(1365% (x — 1)*5)/4096 + 9716 


【 例 8-7 全 究 对 象 : f(x) 一 | zeoszd: ,zo 一 0; 广 (XT) 二 Tcoszt。 求 阻 数 的 军 级 数 展 


下 
编写 程序 如 下 : 


Clear; 
SVYmS XxX; 


dfun= xx CoSs(x); 
Taydfun = taylor(dfun, x,0) 
IntTaydfun = int(Taydfun, x,0) 


运行 程序 ,输出 结 末 如 下 : 


Tavydfun = 

XS5/24 一 x*3/2 + x 

IntTaydfun = 

一 XA (XxX*2/144 一 1/8) 一 x°*2/2 


【 例 8-8〗】 设 f(z) 是 以 2x 为 周期 的 函数 , 它 在 [一 x,xJ 上 的 表达 式 为 


[TTT XT 


ray 
NR 0 二 工 夺 x 
试 将 FPCz) 展 开 成 傅 里 时 级 数 .并 绘图 观察 部 分 和 逼近 f(x) 的 过 程 。 
根据 题 意 化 成 伟 里 时 级 数 展开 式 ,编程 如 下 : 


Clear; 

Syms n xX 

an=2x int(pix cos(nx x) — xx* cos(n x* x),x,0,pi)/pi 
a0 = (int(pi+ x,x, — pi,0) + int(pi— x, Xx,0,pi))/pi 


运行 程序 ,输出 结 采 如 下 : 


' an = 
| (4¥ sin((pix n)/2)*2)/(pix n*2) 
a0 = 


pi 


整理 输出 结 采 有 i 


微 

(x) = 上 一 cosz 十 二 cos3z 十 区 -cos5x 十 …* 十 -cosnaz 

绘制 A(z) 的 数值 求解 图 ,编程 如 下 : 及 

级 

Clear; Eala 

1- 
SVms X; 


X=— pi:0.01:p1; 

k= find( ~— pi<= xtx<=0); fun(k) = pi+x(k); 

kl = find(pi>= x&x>0); fun(kl) = pi— x(kl); 

plot(x, fun, 'r— '); 

hold on 

f= pi/2+4/pix cos(x); 

plot(x,f,'b— "'); 

for 1= 3:2:9 
f=£f+i+ (4/pix cos(ix x))./i.2; 
plot(x,f,'b— ','linewidth',2) 

end 

hold off 

grid on 

xlabel( 'x') 

ylabel( 'f(x)') 


运行 程序 ,输出 结 来 如 图 8-4 所 示 。 


/(¥) 


i EP 
| I 
| I 
0 
-4 一 3 -2 一 | 0 | 2 3 4 
x 


图 8-4 末 数 通 近 结果 


8.2 微分 方程 在 实际 物理 模型 中 的 应 用 


微分 方程 建 模 是 解决 实际 问题 的 一 个 非常 有 效 的 方法 ,下 面 通过 实例 分 析 微 分 方程 
建 模 与 实验 在 实际 生活 中 的 应 用 。 
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8.2.1 肿瘤 大 小 应 用 分 析 


例如 ,肿瘤 大 小 V 生长 的 速率 与 V 的 a 次 方 成 正比 ,其 中 da 为 形状 参数 ,0 三 a 三 1; 
而 比例 系数 天 随时 间 减 小 : 减 小 速率 又 与 当时 的 天 值 成 正比 ,比例 系数 为 环境 和 参数，， 
设 某 肿瘤 参数 < 王 1:,2 王 0.1:, 天 的 初始 值 为 2,V 的 初始 值 为 1。 

试 分 析 此 肿瘤 生长 不 会 超过 多 大 ? 多 长 时 间 肿 瘤 大 小 翻 一 倍 ?” 何 时 肿瘤 生长 速率 
由 递增 转 为 递减 ? 硅 参 数 a 二 2/3 呢 ? 

对 于 肿瘤 生长 问题 ,建立 相应 的 微分 方程 为 


求解 肿瘤 大 小 Y 和 比例 系数 天 的 方程 ,编程 如 下 : 


Clc,clear 

close all 

Clear; 

和 求解 Vk 方程 

syms 七 

s= dsolve('Dyv= kx v1', DE=—-0.1 xk', ''v(0}= 1','k(0) = 2"','t"'), 


k: [lxl svml| 
v: [lxl1 sym | 


二 
exp(20) x exp( — 20 x exp( 一 七 /10)) 
kk = 

2 % exp( — t/10) 


求 肿瘤 生长 的 极限 ,程序 如 下 : 
limv = 工 和 七 ( 立 七 ， 工 王 ) 
运行 程序 ,输出 结果 如 下 : 


1]imyv = 
exp( 20) 


因此 此 肿瘤 生长 不 会 超过 e 。 做 出 肿瘤 大 小 Y 和 比例 系 效 天 关于 时 间 上 图像 , 编 
程 如 下 : 


Clear; 
二 三 心 : 蝇 . 工 :7O; 


vl = exp(2)^10x exp( — 20 *% exp( — 1/10 x t)):; 9 
kl = 2*x exp( — 1/10 * t); 程 
subplot(1,2,1) 及 
plot{(t, vil, 'r',t,k1, 'b', 'linewidth', 2) 级 
legend( 'V', 'K') 数 
grid on 
subplot(1 2 ,2) 
plot(t, kl, 'b', 'linewidth',2) ' 
grid on ' 


xlabel( ‘七 ') 
ylabel( 'V') 


运行 程序 ,输出 图 形 如 图 8-5 所 示 。 


图 8-5 变化 曲线 图 
对 于 多 长 时 间 肿 瘤 大 小 增长 一 倍 , 即 肿瘤 体积 变 为 原来 的 2 倍 时 的 时 间 ,编程 如 下 : 


Clec,clear, close all 
t0 = vpa(solve('exp(2)*10 x exp( — 20 x exp( — 1/10xt))= 2','t'),5) 


运行 程序 :输出 结 有 如 下 : 


tO = 
D0. 352712 


肿瘤 生长 速率 由 递增 转 为 递减 的 时 间 : 即 需要 知道 对 从 求 2 阶 导数 求 出 生长 速率 的 
守 数 方程 V,。 编 程 如 下 : 


Clear; 

syms 七 

format short 

vt= diff(exp(2)“10 * exp( — 20 *% exp( — 1/10 * t)),t,2) 
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运行 程序 ,输出 结果 如 下 : 


Et = 
(4069860639536131 x exp( — t/5) x exp( — 20 x* exp( — t/10)))/2097152 一 (4069860639536131 * 
exp( 一 七 /10) x exp( 一 20*% exp( —t/10)))/41943040 


做 出 肿瘤 生长 速率 变化 图 ,编程 如 下 : 


1 。 

tO0:0.1:1000- 

vtl1 = 一 4069860639536131/41943040 x exp( 一 1/10 x* t). x exp(— 20 x*x exp(— 1/10 x t)) 十 
4069860639536131/2097152 x# exp( — 1/10 x t).*2. x exp( — 20*% exp( — 1/10*x t)); 

plot(t, vt1l, "linewidth', 2) 

grid on 

xlabel( 't') 

Ylabel( ' 肿 瘤 生 长 连 府 1 


运行 程序 ,输出 结 采 如 图 8-6 所 示 。 


《速率 


肿瘤 生 芋 


本 


| 0 100 200 300 400 500 600 700 800 900 1000 

| i 

图 8-6 肿瘤 生长 速率 变化 图 

| 由 图 8-6 所 示 , 找 出 2 阶 导 数 为 0, 编程 如 下 : 

Clear; 

syms 七 

tl = vpa(solve( — 4069860639536131/41943040 x exp( — 1/10 x t) x exp( — 20 x* exp( — 1/10 x* t)) 
+ 4069860639536131/2097152 x% exp( — 1/10 * t)^2 x exp( — 20 *% exp( — 1/10 * t)),t),5) 


运行 程序 ,输出 结果 如 下 : 


ee 
29.951 


\ 则 肿瘤 生长 速 认 由 递增 转 为 促 减 的 时 间 为 29. 957。 


当 a 二 计时 ,编写 微分 方程 函数 文件 如 下 : i 

分 
function dy = Dfund4( 七 ,7) a 
dy = zeros(1,1):; 及 
dy(1) = 2 x exp( — 1/10* t) x (y(1)*(2/3)); 级 


end 


编写 肿瘤 生长 速 诗 程序 如 下 : 


Clear 

cle 

options = odeset('RelTol', le— 4,'AbsTol',le— 5); 
[T,Y] = ode45((@Dfun4,[0 10001,1,options):; 
box on 

grid on 

axis equal 

plot(T, YY,'linewidth',2) 

grid on 

xlabel( 'T') 

ylabel('Y') 


运行 程序 ,输出 结 末 如 图 8-7 所 示 。 


SI EE Ta ek ee WE EE Te i "i 
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T 


图 8-7 肿瘤 生长 速率 变化 曲线 


8.2.2 放射 性 废料 的 处 理 问 题 


美国 原子 能 委员 会 处 理 浓 峭 的 放射 性 废料 曾经 使 用 的 方法 是 把 它们 闻 和 人 密封 的 贺 
棚 里 ,然后 扔 到 水 尝 为 90 多米 的 海 展 。 生 态 和 学 冢 和 科 和 尝 家 们 表示 担心 :人 圆 棚 下 这 到 海 
压 时 与 海 抵 碰撞 而 发 生 破 狼 , 从 而 造成 核 污 染 。 原 于 能 委员 会 分 辨 说 ,这 是 不 可 能 的 。 
为 此 工程 师 们 进行 了 碰撞 试验 ,发 现 当 圆 桶 下 沉 速 度 超过 12.2m/s 与 海 压 相 撞 时 , 圆 桶 
就 可 能 发 生 碰 错 。 这 样 为 于 倪 圆 桶 磁 煞 ,需要 计算 一 下 国彬 沉 到 海底 时 速度 是 多 少 。 已 
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知 圆 桶 重量 为 239. 46kg, 体 积 为 0. 2058ms ,海水 密度 为 1035. 71kg/m?。 如 果 圆 桶 速度 
小 于 12. 2my/s, 就 说 明 这 种 方法 是 安全 可 靠 的 ,否则 就 要 禁止 用 这 种 方法 来 处 理 放射 性 
废料 。 假设 水 的 阻力 与 速度 大 小 成 正比 例 ,其 中 比例 稼 数 & 一 0.6。 试 判断 这 种 废料 处 理 
的 方法 是 否 合理 。 

一 般 情 况 下 ,速度 vv 大 k 也 大 ; 速度 小 k 也 小 。 当 wv 很 大 时 ,速度 与 时 间 的 关系 如 
何 ? 并 求 出 当 速 度 不 超过 12. 2mys, 圆 棚 的 运动 时 间 和 位 移 应 不 超过 多 少 (CR 的 值 仍 设 为 
0.6)? 

由 mrg 一 pigvi 一 正二 ra 可知 


二 PS fr 
PE Pd 
由 此 建立 相应 的 微分 方程 为 
1035.7 1 x 9.8 Oe 0. bv dv 
9.85OCo 人 0.2058 一 一 一 一 一 一 一 
239.46 ~ 239.46 dt 
| 1035.71 x 9.8 | 0.6 dz 二 zx 
日. 站 一 一 一 一 一 0.2058 一 一 一 一 一 一 
| 239. 46 I 239. 46 di de 


编程 求解 该 微分 方程 。 编 程 如 下 : 


笠 求 出 速度 立方 程 

Clear; 

format short 

T= dsolvel'Dv= 1.0768 -0.6 x* wv/239.46', vwv(0) =0', Dv(0)=1.0768','t') 


\ 运行 程序 ,输出 结果 如 下 ; 


要 = 一 
53840000000000000000000000000000000/125281884239538962665998496617389 一 
(53840000000000000000000000000000000 x exp( — (125281884239538962665998496617389 x 七 ) / 
50000000000000000000000000000000000))/125281884239538962665998496617389 


求 速度 wv 的 极限 ,程序 如 下 : 
syms t; 


第 求 出 极限 
Vmax = vpa(limit(v,t, ijnf),5) 


运行 程序 ,输出 结果 如 下 : 


429.75 


求解 位 移 方程 ,程序 如 下 : 


当 求 出 位 移 工 方程 
| Clear; 
syms 七 ， 
x= dsolve('Dx= 2685943/6250 — 2685943/6250 x exp( - 10/3991 x t)', 'x(0) = 0','t') 


较 大 ,和 那 


运行 程序 ,输出 结果 如 下 : 


让 三 


(2685943 x t)/6250 + (10719598513 x exp(— (10*xt)/3991))/62500 — 10719598513/62500 


当 位 移 X= 二 90 时 , 求 其 运行 时 间 ( 舍 去 小 于 0 的 值 ), 程 序 如 下 : 


t0 = vpa(solve( '10719598513/62500 x exp( — 10/3991 x 七 ) + 2685943/6250 x tt 10719598513/ 


62500 = 90', 't'),5) 


运行 程序 ;输出 结果 如 下 : 
eo 
12.999 
代入 速度 方程 ,求解 此 时 速度 ,编程 如 下 : 


v0 = subs('2685943/6250 — 2685943/6250 x exp( — 10/3991 x t)', 


t, 12.999) 


v= 2685943/6250 - (2685943 x exp( - 12999/399100))/6250; 


运行 程序 ,输出 结果 如 下 : 


磷 二 
13. 7118 


从 求解 可 知 ,vo 大 于 12. 2m/s, 所 以 该 方案 不 合理 。 


一 般 情况 下 ,速度 v 大 k 也 大 ; 速度 vv 小 & 也 小 。 
么 梓 ? 编程 如 下 : 


么 这 时 速度 与 时 间 的 关系 怎 


clc,clear,close all 


syms 七 


假设 速度 达到 10mys 时 ,表示 了 速 


tl = vpa(solve( '2685943/6250 - 2685943/6250 x exp( — 10/3991 x t) = 10','t'),5) 
xl = vpa( subs ( '10719598513/62500 x exp( — 10/3991 * t) + 2685943/6250 x t — 10719598513/ 


62500', t,t1),5) 
Dvl = 1.0768— 0.6*x 10/239.46 


: 序 ,输出 结果 如 下 : 


运行 程 


此 时 速度 的 仿 微 分 方程 为 


Fr 了 
1.0517— .0.6 


239.46 


dv 
dr 
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求解 该 微分 方程 ,编程 如 下 : 


clc,clear,close all 

Clear; 

T= dsolve( 'Dv= 1.0517—- 0.6x% v2/239.46','v(0) = 10','t') 

syms 七 ; 

x= dsolve( 'Dx = 13/1000 x 2483630“^(1/2) x* tanh(1/30700 x 2483630 ^ (1/2) x t+1/2*x log((13 
x 2483630 ^(1/2) + 10000})/(13* 2483630 *(1/2)— 10000))) ',''x(0) = 47.170','t') 

Clear; Svms T 十 

t=0+eps:l1:500; 

vl = 13/1000 x 2483630 “(1/2) x tanh(1/30700 x 2483630 ^(1/2) x t+1/2x*x log((13 x 2483630“ 
(1/2) + 10000)/(13* 2483630 “(1/2) — 10000))); 

plot{(t, vil, 'linewidth',2) 

grid on 

xlabel( 't') 

vylabel( 'v') 


运行 程序 ,输出 结果 如 下 : 

于 本 二 

(1000000000000000 x 38981940134533469537227993755179885 * (1/2) x tanh(1000000000000000 
x 38981940134533469537227993755179885 A x ({ 13 x En 
50000000000000000000000000000000000 + (38981940134533469537227993755179885 ^(1/2) * 
atanh ( 38981940134533469537227993755179885 ( 1/2 )/404500000000000000 ))/ 
38981940134533469537227993755179885000000000000000 )))/ 
9637068018426074051230653585953 

Se 

(3991 * log(cosh(log( (13 * 2483630 “(1/2) + 10000)/(13 * 2483630 “(1/2) 一 10000))/2 + 
(2483630 “(1/2) * t)/30700)))/10 - (3991 x log(cosh(log((13 * 2483630 “(1/2) + 10000)/ 
(13 * 2483630^(172) — 10000}))/2)))/10 + 4717/100 


输出 图 形 如 图 8-8 所 示 。 
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图 8-8 ”速度 曲线 图 


当 速 度 不 超过 12. 2mys, 编 程 求解 圆 桶 的 运动 时 间 和 位 移 如 下 : 
微 

Clear; 分 
方 

syms 七 程 

t0 = vpa(solve('13/1000 x 2483630 “(1/2) * tanh(1/30700 x 2483630 ^(1/2) x t+1/2x* log((13 

x 2483630 “(1/2) + 10000)/(13 * 2483630*(1/2) 10000))) =12.2','t'),5) 级 


x0 = vpa(subs('— 3991/20 * log(tanh(1/30700 x 2483630 “(1/2) xt— 1/2x* log(7) 一 172 * log 
(A4567621) + 1/2 * log(51973347 + 26000 x 2483630 “(1/2))) 1)— 3991/20 x log(tanh(1/30700 
x 2483630 ^(1/2) x* to 1/2 x* log(7) — 1/2 * log (4567621) + 1/2 x log (51973347 + 26000 * 
2483630 *(1/2)))+ 1) 1+ 3991/20 x log (7) + 3991/20 x log (4567621) - 3991/10 x log(13) — 
3991/10 * log(3228719 + 1000 x 248363 “(1/2) * 10 “(1/2)) + 3991/20 # i x pi+ 3991/20 * log 
(51973347 + 26000 x 248363 “(1/2) x 10*(1/2)) +4717/100',t,t0),5) 


运行 程序 ,输出 结果 如 下 : 
3 = 
2 TL 


HO 二 
80.248 


当 速 度 不 超过 12. 2mys: 圆 桶 的 运动 时 间 和 位 移 为 2. 9719s 和 80. 248m。 
8. 2.3 质点 系 转动 惯量 求解 


Po 的 nn 个 质点 PiCxi yy1) Pz (Cr yz)，…… ，P.(xn，Yn) ,其 质量 分 别 汶 ml， 
mz sw: 傅 定 一 个 点 PCzyy) ,使 得 质点 系 关 于 此 点 的 转动 惯量 为 最 小 。 
ppt 的 转动 惯量 为 J。 由 转动 惯量 定义 可 憩 


三 [rr FC(y— yi) |X m: 


要 满足 质点 系 的 转动 惯量 为 最 小 , 即 PL )? 十 (vy 一 y)?]Xm; 和 最 小 ,这 是 一 


由 上 了 式 可 知 
J— Dr: —2z +x? ty — 2y+ yy] Xm, 
— Dm -| 六 Dm A 一 2y 之 ,ya | re 十 yz )m; 
由 上 式 满足 最 小 值 条 件 时 ,其 了 一 0, 一 0, 可 得 


,3 


- 一 2z Dm, 2 ron = 市 


= ZYy ， Hi OT— 六 yani 一 
9 i 一 ] 一 ] 
由 上 式 可 得 
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Ei 


天 
+ .了 ;TI i > | yan 
2 


> Ps > ns 
二 1] 


i 二 1] 


革 | = 


并 一 


王 


rr Yin i 
则 忆 点 在 x 二 王 一 一 ,y 二 Dm 你 有 极 小 值 , 此 时 使 得 质点 系 关 于 PP 的 转动 惯 
um: > i 
量 为 最 小 。 
综 上 分 析 , 有 


i 一 ] i 二 1 
具体 的 MATLAB 代码 如 下 : 

clc,clear,close all 

syms XxX X11 vy yi min 

J = mi ((x— xi)2+ (vi+ yi)’2) 先 圭 二 1 和 nn 
al = simplifvy(J) 竺 化 简 

a2 = expand(al) 向 展开 

a3 = diff(a2,x) 竺 对 这 的 于 装 
a4 = diff(a2,y) 和 对 yy 的 导数 
运行 程序 ,输出 结果 如 下 : 

可 = 

mA 一 xi)“*2 十 【77 + wi})"*2) 

al] = 

mi ((x — xi}*2 二 (7 + vi})*2) 

aA2 一 

mi¥X2 一 2 mixXxx Xliti+ mixxi’2+ mixy’2+ 2%mixyxyi+t+ mi yi’2 
A 二 

2% miX— 2%mi Xl 

ad = 


2 miy+ 2 mi yi 


8.2.4 储 油 锥 的 油 量 计 和 异 


一 平 放 的 椭圆 柱 体形 状 的 油 镀 ,长 度 为 工 ,椭圆 的 长 半 
。 轴 为 e, 短 半 轴 为 0, 油 的 密度 为 o, 油 饶 中油 的 高 度 为 姑 。 油 
。 镀 的 横断 面 如 图 8-9 所 示 。 

得 到 横断 面 的 方程 表达 式 为 


图 8-9 油缸 端面 


有 


2 
a” | 六 。 
将 椭圆 对 y 进行 微分 : 则 图 8-9 中 小 矩形 的 面积 为 六 
程 
2 1 1] 一 pz dy 2 


油 钥 中 油 权 断面 中 噩 度 为 疡 时 的 面积 为 
一 5 十 天 vy 
| Za pz dy 
当 油 始 中 油 的 局 度 为 h 时 油 量 为 
| 2paL a 


= 六 pp’ 


一 6 十 ~ 
对 | ，2pLa \/1 一 区 dy 进行 积分 为 


令 y 二 bsimt 『arcsin( —1+ ) 
/ | 2oLapcot td 


2 ol ap 


arcsin (CO—1+ 可 ) 4 . PS 
加 | 5 1 十 cos2z |， 
J 一 至 2 


_ [poeLab (2t+ sin21) ] 


2 


M 
4 


一 oLab | arcsin( 一 ] 1 与 | 
具体 的 MATLAB 代码 如 下 : 


clc,clear,close all 
syms abhyL 
= Sqrtlib “2 ww 2) 


ml = int(m): 各 积分 

m2 = int{(m,’'— b', 'n') 向 积分 

m3 = subs(m2, 'n', 'y'); 多 替换 变量 

S=2x%a/bx m3; 

simplify(sS) 当 化 简 

V=S%L 

V=2x%a/bx (1l/2x vx (b*2—-y"*2)*(1/2) + 1/2x% b’2x atan(vy/(b “2— vy*2)*(1/2))) x*L; 
= hh— b; 

Vi = subs(V,'y','h— b') 

simplify(V]i) 


运行 程序 ,输出 结果 如 下 : 


m2 三 


(b*2x asin(b/(b 2})°*(1/2)))})/2 + (b “2 x asin(n/(b “2)*(1/2))) /2 + (nx (Bb*2 —- n2)°(1/ 


2 2 
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BIlS 一 

(ax (b“2x# asin(b/(b*2)*(1/2)) + pb’2xasin(y/(b 2)°(1/2)) + yx (b*2 一 了 YY^2)^(172)))7 
b 

秆 三 

(2x Lixax ((b"*2x%xasin(b/(b "2)* (1/2)))/2 + (b*2 x%asin(y/(b 2)*(1/2)))/2 + (yx (b*2 
— YT"*2)"(1/2))/2)) Ab 

Vi = 

— (2xLxax ((b"2xatan((b — hj/(b “2 -— (b - h})*2)*(1/2)))/2 + ((b*2 一 (b - h)*2)" 
(1/2) * (b — h)})/2))/b 

aIlSs 二 

—- (2x Lxax ((b*2xatan((b 一 hi hx (2xb 一 h})})*(1/2)))/2 + ((b 一 hx (hx (2xb 一 


h)) “(1/2))/2))/b 
>> 


8.2.5 香烟 毒物 插 和 人 问题 


人 在 吸烟 时 ,烟草 内 所 含 的 毒物 在 点 燃 处 随 烟 筋 释 放 , 释 放出 来 的 烟 家 一 部 分 直接 
进入 空气 中 :另外 一 部 分 洛 未 点 燃 的 香烟 和 过 滤 踢 罕 行 。 烟 雪 在 穿行 过 程 中 ,烟雾 中 的 
毒物 不 断 被 未 点 燃 的 烟草 及 过 滤 跨 吸收 ,最 后 剩余 的 毒物 全 部 进入 人 体 .。 这 种 吸收 过 程 
使 未 点 燃 烟 晶 中 毒物 黎 度 随时 间 的 变化 而 变化 。 

考虑 抽烟 进入 人 体 的 毒物 数量 (不 考虑 从 空气 烟 竺 中 吸 和 的) 与 香烟 中 所 含 毒 物 总 
量 ,香烟 长 度 、 过 滤 嘴 长 度 每 因 系 间 的 关系 ,对 于 香烟 毒物 摄 入 作 如 下 假设 : 

(1) 一 文 香 烟 的 毒物 总 含量 M 王 800mg, 毒 物 均匀 分 布 在 长 度 为 i 二 80mm 的 香烟 
中 ,过 滤 嘴 长 度 为 i; 二 20mm.。 

(2) 烟草 点 燃 后 毒物 全 部 随 烟 筋 释 放 , 晶 均匀 分 布 在 烟 筋 中 ， 

(3) 直接 进入 空气 的 烟雾 比例 为 a 二 30% ,其 余 的 部 分 沿 未 点 燃 的 烟草 穿行 ,穿行 速 
度 是 v 二 50mm/s。 

(4) 单位 长 度 未 点 燃 烟 草 和 过 滤 嘴 在 单位 时 间 内 对 随 烟 雾 穿行 的 毒物 的 吸收 率 分 别 
是 5 二 0.02 和 8= 王 0.08。 例 如 , 带 有 毒物 量 AM 的 烟雾 经 过 /长度 的 过 滤 嘴 时 ,被 过 滤 嘴 
吸收 的 毒物 量 是 AM ，B* (lsv ')。 

(5) 把 一 支 香 烟 均 匀 分 成 N 有 段 ,每 次 吸烟 部 燃烧 一 段 ; 在 点 燃 后 的 任意 时 刻 ,每 一 段 
未 燃烧 烟草 中 的 毒物 部 在 该 段 均匀 分 布 ,不同 段 的 毒物 密度 不 相同 。 

香烟 分 为 六 段 , 说 明 下 一 段 香 烟 的 毒物 量 亚 加 上 一 段 香 烟 的 毒物 量 。 由 上 述 分 析 可 
知 , 当 N= 二 4 时 ,编写 MATLAB 程序 如 下 : 


clce 名 清 屏 

clear all; 第 删除 workplace 变量 
close all; 第 关 掉 显示 图 形 窗口 
format short 

秆 初始 化 

M = 800; 各 香烟 的 毒物 总 含量 


N= 4:; 各 香烟 均匀 分 成 N 段 


Ll = 80; 
L2 = 20; 
ee 
C=0.7; 

T= 0; 
b=0.02; 
Deta= 0.08; 
m= | |; 
I 


t= zeros(1000, 


fori=1:N 


秆 香烟 长 度 
尘 过 泪 嘴 长 度 
第 空气 的 烟雾 比例 


穿行 速度 


多 吸收 率 
第 吸 收 率 


1000); 


m(i,1)= (M/N+t(i, 了 ) ) ; 

m(i,2) = (MA NT t(i,j)) x* ce; 
m(i,3) = (M/N+ t(i,j))xcx* bx (Ll1/N)/v; 
m(i,4) = ((M/N+t(i,j)) cec— mi,3)) x bx (LI1/N)}/v+t(i,2); 


mi,5)= ((M/N+Tt(i 3)) cec—m(i,3) —m(i,4)) x bx (LI/N)/v + t(i,3); 


m(i,6) = ((M/N+t(i,j})) x cc— mi,3) — m(i,4) — m(i,5)) x betax L2/v+t(i,4); 


m(i,7) = (M/N+t(i,j)) cc- mi,3)—- m(i,4) — m(i,5) — m(i,6) 十 七 (二 2) 十 十 (3) + 


t(i,4)+t(1,5); 
七 ( 工 十 1 2) = m(i,3); 
让 ( 工 十 3 三面 ( 工 , 直 ) ; 
t(1i+ 1,4) = m(1i,5); 
t{(i+1,5)=m(1i,6):- 
可 于 下 二 


[| 


开始 时 
第 1 段 


运行 程序 ,输出 结 采 如 下 : 


m = 
200.0000 
201.1200 
202.23713 
203.3427 


整理 相应 的 结果 如 表 


第 2 段 
第 3 段 


140. 0000 
140. 7840 
141.5661 
142. 3399 


OQ. 000 O00 
200. 0000 
201. 1200 


203. 3427 


1.1200 
1.1263 
1. i325 
1.1387 


8-1 所 示 。 


表 8-1 


140. 0000 
140.7840 
141.566] 
142. 3399 


1.1110 1.1022 4.3733 
-A .2104 5.4289 
.2497 3.3427 b.3233 
22.2621 3.3613 7.6812 
N 段 香 烟 报 入 毒物 量 (meg) 


每 段 理 烟 的 


军 积 毒物 量 


. Q000 0. 9000 .0 


.1200、1. 1110 、] 


,022 


. 1]203 .2. 
132052. 


. 1387 、2. 


2313.2 
2497 .3 
262]1 .3 


0 


下 
137.4877 
139. 3186 
141.1469 


. O000 


4. 3733 


6. 5253 
7. 6812 


吸 完 该 段 进 入 
人 体 的 毒物 量 


U.UUU0 
132. 2935 
137. 4877 
139. 3186 
141. 1469 
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8. 2.6 冰 埠 的 下 落 速 度 


当 永 看 由 局 空 洛 下 时 :, 它 党 到 地 球 引 力 和 空气 阻力 的 作用 ,阻力 的 大 小 与 冰 看 的 形 
状 和 速度 有 关 。 一 般 可 以 对 阻力 作 两 种 假设 : 

(1) 阻力 大 小 与 下 沙 的 速度 成 正比 。 

(2) 阻力 大 小 与 速度 的 平方 成 正比 。 

已 知 初 速度 (0) 一 0、 冰 看 质量 mmr、 重力 加 速度 g、 正 比例 系数 一 0。 

(1) 由 物理 学 可 知 , 建 立 速度 满足 的 微分 方程 , 冰 罩 受到 地 球 引 力 和 空气 阻力 的 影 
啊 ,其 加 速度 应 该 为 


联 记 上 述 两 式 得 
777 十 k(t) 一 mg 
在 上 式 两 边 做 拉 普 拉 斯 变换 并 且 代 入 v(0) 二 0, 得 


msV(s) 十 有 VS) = Mme。 a 
Ss 


vt 
lz 


解 代 数 方 程 得 


mm. l 
§ k sk/m ) 
最 后 对 VC(s) 做 拉 普 拉 斯 反 变 换 , 有 


We ot I 


从 上 式 知 , 当 f=>oco 时 ,vw() 的 值 为 全 。 


《2) 由 阻力 大 小 与 速度 的 平方 成 正比 ,有 mg 一 kv 二 ma, 则 上 式 所 要 求解 的 模型 
变 为 
ni dz 
dr 
冰 看 下 洛 时 ,在 一 开始 速度 比较 小 时 (阻力 小 于 重力 ), 冰 罩 的 速度 总 是 增加 的 。 当 
速度 达到 一 定时 (阻力 等 于 重力 ) ,速度 不 再 增加 ,显然 这 个 时 候 就 是 冰 看 速度 的 最 大 值 。 
所 以 , 硅 要 冰 乱 的 速度 达到 最 大 ,有 


kv (t) = mg 


kf = mg 


即 
ku* = mgs, v= 


采用 数值 计算 的 办 法 来 求解 该 非 线 性 微分 方程 
编写 MATLAB 程序 如 下 : 


。 此 时 , 取 和 太一 1.1,& 一 0.1,g 一 9.8。 


function yl15 11 
t0=0; ps 
Lr 方 
AaA= 9.8; 争 初 始 加 过 度 程 
options = odeset( RelTol' 1e 一 4 AbsTol' [1e 一 4]); 2 


[T,V] = ode45(@diffv,[t0 tfl,a,options); 委 用 低 阶 法 求 微分 方程 2 的 数值 解 数 
plot(T,V) 
axis tijght 
grid on 
xlabel('t'); 
vlabell( 'v'); 
end 
function dv = diffv(t,v) 多 第 2 个 微分 方程 
m= 1.1; 
k= 0.1; 
g= 9.8; 
dv = zeros(l1,1)}):; 
dv(1) = (mxg— kxv(1) x v(1))/n; 


end 


运行 程序 得 数值 解 如 图 8-10 所 示 。 


mm 


Sy ss 


PT 


图 8-10 ”速度 曲线 


(3) 综合 考虑 下 沙 阻 力 和 速度 一 次 和 二 深 方 相 关 。 对 于 阻力 ,不妨 先 将 阻力 设 成 速 
度 的 函数 , 即 令 f 二 ff(v)。 

利用 泰勒 级 数 将 其 理论 上 展开 成 为 如 下 的 形式 : 

fv) = Rv ke 二 kav" 二 

ov 的 深 方 取决 于 速度 的 大 小 ,对 这 个 冰 宣 的 模型 ,讨论 速度 的 平方 项 , 故 不 妨 将 阻力 

设 为 
flv) = kv kevw’ 
则 微分 方程 变 为 
dvut( zr) 
dz 
用 数值 计算 的 方法 求 出 数值 解 , 取 w 一 1. 1, ki 一 0.1,ks 一 0.2,g 一 9.8。 编写 


于 


二 kiv (ft) 十 Ravp(Ct) 一 mg 
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MATLAB 程序 如 下 : 


function Y15 12 


tO0O=0; 

t=6; 

= 9.8; 委 初始 加 速度 

options = odeset( 'RelTol' ,1e 一 4，'AbsTol'，[1e 一 4]) 7; 

[TV] = ode45(@ditftv [tO tf],a,options); 多用 低 阶 法 求 微分 方程 2 的 数值 解 
plot(T,V) 


axis tight 

grid on 

xlabel( 't'):; 

vylabel( 'v'); 
end 


function dv = diffv(t,v) 先 第 2 个 微分 方程 
m= 1.1; 
kl=0.1];k2= 0.2; 
g= 9.8; 
dv = zeros(1,1):; 
dv(1) = (mx g— El x* v(1) x* v(1)— k2 *v(1)) /nm; 
end 


运行 程序 得 其 数值 解 的 结 采 如 图 8-11 所 示 。 


9.80 


3 
| 


图 8-11 修正 速度 曲线 


本 章 小 结 


本 章 深 人 浅 出 地 讲解 了 微分 方程 及 级 数 应 用 ,从 基本 运算 出 发 ,结合 具体 的 案例 分 
析 ,使 得 理论 分 析 和 MATLAB 编程 操作 相 绪 合 :, 更 加 容易 接受 ,特别 在 放射 性 废料 处 理 
和 冰 御 下 落 速 度 等 问题 中 ,采用 MATLAB 求解 ,再 要 和 擎 握 竺 号 回 量 解 和 数值 回 量 解 之 
间 的 处 理 ，。 


MATLAB 在 数学 类 科技 应 用 软件 中 在 数值 计算 方面 首届 一 指 。 
MATLAB 可 以 进行 矩阵 运算 、 绘 制 子 数 和 数据 、 实 现 算 法 、 创 建 用 户 
界面 .连接 其 他 编程 语言 的 程序 等 ,MAILAB 高 效 的 数值 计算 及 符号 计 
算 功 能 ,能 使 用 户 从 繁杂 的 数学 运算 分 析 中 解脱 出 来 。 本 章 讲 解 种 见 的 
数值 计算 算法 ,包括 高 斯 消 元 法 ,高 斯 塞 德尔 迭代 法 、 雅 可 比 近 代 法 等 。 

学 习 目 标 : 

。 熟练 掌握 MATLAB 编程 表示 方法 ; 

。 熟练 运用 MATLAB 解决 常见 数值 计算 问题 ; 

。 熟练 掌握 MATLAB 对 递 推 . 夺 代 、 消 元 等 算法 的 求解 。 


9.1 过 推 算法 


阔 推 算法 是 解决 实际 问题 中 使 用 相当 普 近 的 一 种 算法 , 它 的 数学 
描述 是 带 初 值 的 递 推 关系 式 ， 


9.1.1 循环 述 代 


迭代 法 是 将 求 曲 线 y=/(7) 的 零点 问题 化 为 求 曲 线 y 二 g(x) 与 直 
线 y= 二 xz 的 交点 ,迭代 过 程 如 图 9-1 和 图 9-2 所 示 。 从 初始 点 ze 出 
发 , 沿 直 线 z 二 zxo 走 到 曲线 y 一 p (xz), 得 点 (zo， gp (xo)) ,再 沿 直 线 
y 二 (xo) 走 到 下 线 y 三 工 ; 交 后 为 (zx1，qp (Xx1)) ,如 此 继续 下 去 , 越 来 
越 接近 后 (ZX,，Yy")。 


【 例 9-1】 基于 迭代 原理 证 明 
令 “站 0 Ej Wy 有 


i 
5 。 


当 nn 无穷 大 时 ,有 
Tntl “= Tn 


则 x, 二 V1 十 x ,整理 得 


过 党 ( 首 ) 内 半 谨 小 央 国 六 
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| | 

| | 

| | 

| 

| 
| XXy X00 x Xx Xl Xo x 
图 9-1 迁 代 格式 1 图 9-2 ”和 迭代 格式 2 


编写 程序 求解 该 方程 如 下 : 


clec,clear,close all 
roots([1,—1,—1]) 


运行 程序 ,输出 结 采 如 下 : 


考虑 到 z 盖 0, 因 此 z 一 1.618 一 Lys 


2 Ee 
【 例 9-2】 用 迁 代 法 求 极 限 A=lim 一 一 一 一 ,a 六 1。 
a 十 一 4 
a 十 一 < 
a 十 
及。1 i 7 一 0,1,2:，。，77 
二 天 无 穷 大 时 ,有 
A = A. 
由 | 
A a OTA, 
整理 得 


编写 程序 求解 该 方程 如 下 : 


clc,clear,close all 

syms a 

solve('l x hn*2+ax An—a', hn') 
pretty(ans) 


运行 程序 ,输出 结果 如 下 : 
线 
ans = ys 
(ax (a + 4))*(1/2)/2 - a/2 
一 a/2 — (axla + 4))*(1/2)/2 < 
组 
: z 求 
A = Va (ca 十 4) a 

Au = 


9.1.2 夺 代 收 伍 性 


设 函 数 g (x) 在 区 间 [a, 妇 上 满足 条 件 ， 

(1) 对 任意 的 XElLa,5j, 都 有 a<OCz) 和 0。 

(2) 存在 证 数 0 二 LL 二 11, 使 得 对 一 切 x,yElLa,.5j], 都 有 | PTI p(y) E= 呈 | 
(TI— wy) 


i 三 LL ,进一步 化 简 得 |y (zx) | 和 所 工 。 


【 例 9-3〗 已 知 方 程 x 一 x 一 1 二 0 在 xo 二 1.5 附近 有 根 , 试 判断 收 印 性。 


clc,clear,close all 

无 三 工 : 心 . 工 : 之 : 

和 

plot(x,y, ro-—— ',']inewidth',2) 
hold on 

x1l= [1;2];v1= [0;0]; 
plot(xl,yvyl,'— ,linewidth',2) 
x2=|1.4;1.4]:y2=[—1;3]; 
plot(x2, 2, kk-—— ', linewidth',2) 
Sa 
plot(x3, v3,'k-—— ','linewidth',2) 
ma=[1.551i.s5lwa=[— iy(6)]; 
plot(xd, vd, rr—— ','linewidth',2) 
= Ti) [vl all 
plot(x5, y5, 'r—— ', 'linewidth', 2) 


运行 程序 ,输出 结果 如 图 9-3 所 示 。 

取 区 间 xEL1. 4,1.5j 进 行 分 析 : 

令 (ZX) 二 XT 一 一 1, 在 区 间 xEL1.4,1.5j] 连 续 , 是 1. 4) 一 一 0.216<0, 三 1. 5) 一 
0. 125 盖 0, 因 此 方程 在 上 EL1.4,1.5j] 有 根 。 

硅 把 方程 写成 下 列 每 价格 式 , 便 于 近代 : 

(1) 区 +] 一 1 一 


1 


| 


(2) zuti = 
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图 9-3 函数 图 像 


Te 


Lo or ee 
右 取 相同 的 初 值 进行 迁 代 ,编程 计算 有 : 


下 三.0.01:1.3- 
ES 
y2=1./sgqrt(x— 1) 
v3= (1+x.*2).*^(2/3) 


运行 程序 ,输出 结果 如 下 : 


Yli = 

1 5 102 1.5030 1.4959 1.4890 1. 4823 1. 4756 1. 4691 1. 4628 
1. 4565 1. 4504 1.4444 

Y2 = 

1. 5811 1.5617 1.5430 1.5250 1.5076 1.4907 1.4744 1.4586 
1. 4434 1. 4286 1. 4142 

下 3 三 

2.0616 2.0746 2.0877 2.1008 2. 1140 2. 1272 2.1405 2.1538 
2. 1672 2.1806 2.1941 


为 了 清晰 地 看 见 yw、 ys、 ys 的 变化 趋势 ,给 制 曲线 图 。 编 程 如 下 : 


clce,clear,close all 
subplot(311),plot(x, vl, 'linewidth',2) 

| legend( 'yl') ;axis tight 

' subplot(312),plot(x, y2, 'linewidth',2) 

legend( 'y2') ;axis tight 

subplot(313),plot (x, v3, 'linewidth',2) 

legend( 'y3') ;axis tight 

运行 程序 ,输出 结果 如 图 9-4 所 示 。 

从 图 9-4 中 数据 的 变化 趋势 看 , 迁 代 格式 1 和 2 得 到 的 序列 可 能 是 收敛 的 ,办 代 3 则 


BR 

1.50 线 
1.48 方 
1.46 各 
. J 组 

I.40 141 142 143 144 1.45 1.46 1.47 148 1.49 1.50 

求 

解 


1.40 1.41 1.42 1.43 1.44 1.45 1.46 147 1.48 1.49 1.50 


DBRRBRB 


下 
的 局 | 上 上 司 的 


1.40 1L4L 142 1.43 144 145 1.46 147 1.48 1.49 1.50 
图 9-4 yys ys 变化 趋势 
可 能 是 发 散 的 。 
事实 上 ,由 迭代 法 收敛 的 充分 条 件 可 知 : 
(1) 对 于 近代 格式 1 ,其 迭代 好 数 为 


Op1 (xX) 二 1 十 = 
则 9 (xz) 在 XzEL1.4,1.5] 上 具有 连续 的 一 阶 导数 : 


clc,clear,close all 


SYS 芒 
向 fail =1+1/x/x; 
diff('1+1/x"*2',x) 


运行 程序 ,输出 结 采 如 下 : 


整理 得 gi (zx) 一 一 ,又 gi(x) 一 0, 且 单调 递 碱 , 故 有 


2 


ax ,| PICZz) | 一 | gp1(1.4) | 一 4 = 0.7289 < 1 
因此 可 知 , 该 迭代 公式 是 收 征 的 。 
(2) 对 于 达 代 格式 2, 其 碗 代 录 数 为 
Dz (TX) 一 由， 
Vr— 1 


则 gz (xz) 在 xzE[L1.4,1.5] 上 具有 连续 的 一 阶 导数 : 
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clc,clear,close all 
SYymS X 

$S fai2= 1/sqrt(x— 1); 
diff('1/sqrt(x— 1)',x) 
pretty(ans) 


运行 程序 ,输出 结果 如 下 : 


ans = 


-1MN2x(x — 1)"(3/2)) 


1 
3/2 
2 | = 1) 
ee F ; = 
整理 得 ez (Xx) 二 一 一 一 一 一 ,又 gz (xX) 一 0, 昌 单调 递减 , 故 有 
E11) 
, Dax ,| 9z(CZ) | 一 | pz(1.4) | 一 了 FT 


因此 可 知 , 该 迭代 公式 是 发 散 的 。 
(3) 对 于 迭代 格式 3, 其 迫 代 了 肾 数 为 

ps (IT) 一 HH 
则 gs(z) 在 XEL1.4,1.5] 上 具有 连续 的 一 阶 导 数 : 


clc,clear,close all 

Syms X 

SS fai3= (x*2+1)*(3/2); 
HiEE(L Ii "2 LI" (2 | 
pretty(ans) 


Ie 行程 友 ， 输出 < 结果 如 下 : 


anis = 
3xX% (XxX*2 + 1)*(1/2) 


3x(x + 1) 


整理 得 ra Cz) 王 3z Vx 十 1 ,又 pa(Cz) 二 0, 且 单调 递增 , 故 有 
max | ps) | 一 | ps(1.5) | 一 3X1.5XW1I.5 十 1 一 8.1125 盖 1 


1. 站 寺 T 寺 1]. 


因此 可 知 ,该 和 失 代 公式 是 发 散 的 。 


.3 牛顿 迭代 


将 韭 线 性 方程 线性 化 ,以 线性 方程 的 解 逐 步 瘟 近 非 线性 方程 的 解 ,这 就 是 牛顿 过 


和 失 代 


法 的 基本 思想 。 牛 顿 迁 代 法 的 几何 意义 如 图 9-5 所 示 。 


图 9-5 牛顿 迭代 法 的 几何 意义 


设 已 知 方 程 f (x) 二 0 的 近似 根 为 zo。,， 大 Cz) 在 其 者 点 工 邻近 一 阶 连 毋 可 微 , 且 
廊 (X) 关 0, 当 zo 充分 接近 x * 时, f(x) 可 用 泰勒 公式 近似 表示 为 
fr) < fxro) tT fF (xo) (rx— ro) 
取 此 xz 作为 原 方 程 的 新 近似 值 zl ,重复 以 上 步骤 ,于 是 得 选 代 公式 为 


一 妇 n= 0,1,2,... 
(Xn. 


在 MATLAB 中 编程 实现 的 牛顿 法 的 函数 为 Newton()。 
功能 : 用 牛顿 法 求 函数 在 某 个 区 间 上 的 一 个 零点 。 
调用 格式 ， 


nl ~— i 


function xr = Newton( fun, x0,D) 
其 中 ,xz, 为 所 求 非 线 性 方程 的 解 ; fun 为 所 定义 的 因数 ; ro 为 初 妨 值 ; D 为 计算 的 


精确 度 。 
牛顿 法 的 MATLAB 程序 代码 如 下 : 


function xr = Newton( fun, x0,D) 
名和 牛顿 法 求解 非 线 性 方程 的 解 
和 多 xr 为 所 求 非 线性 方程 的 解 
和 fun 为 所 定义 的 函数 
秆 xX0 为 初始 值 
当 D 为 计算 的 精确 度 
[£0,df] = 芋 eval(Eun, xO) ; 
if df == 0; 
error('d[f(x}/dx] = 0 at x0'); 
end 
1f nargin < 3; 
D= le—6; 
end 
d= £f0/df; 
while abs(d)> DD:; 
Xl1] 二 x0 — d; 
XO = xXx]; 
[£0, df | = fevall( fun, x0):; 
if df == 0; 
error('d[f(x)l/dx= 0 at x0'); 
end 
叮 三 王 DdE: 
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end 


Xr 二 Xl]; 


【 例 9-4】 利用 牛顿 法 求 方程 + 一 lnzx 一 2 在 区 间 L2,4j 的 根 ,考虑 不 同 初 值 下 牛顿 法 
的 收敛 情况 。 
首 和 抑 定 义 计 算 恩 数 的 图 数 文 件 w.m 如 下 : 


function [vy,dy,d2vy] = W( 工 ) 


VY = XxX- log(x) — 2; 多 计算 元 数值 

if nargout > 1; 
ff= sym('x— log(x) — 2'); 秆 定义 符号 通 数 
dy = diff (ff); 第 求 一 阶 导 数 
dy = subs(dy, x); 各 峰值 

end 


if nargout == 了; 
d2v = diff(EE. 2)- 第 求 2 阶 导数 
d2y= subs(d2y, Xx); 和 贱 值 

end 


由 此 编写 牛顿 迭代 算法 ,编程 如 下 : 


clc,clear,close all 
format short 
clear all; 


xx= linspace(2,4,200); 竺 对 自 变 量 取 样 

VY= w(xx); 竺 计 算 各 点 的 函数 值 
plot(xx, y); 和 绘制 函数 y(x) 曲 线 

hold on ; 

plot(xlim,[0,0], 'k:'); 币 绘制 零 刻 度 线 

xrl = newton( 'w' 1.5) 第 和 牛顿 求 根 ,初始 点 是 1.5 
plot(xrl,w(xr1), 'rs'); 秆 绘制 解 对 应 的 点 
plot(1.5,w(1.5), 'rs'):; 

xr2 = newton( 'w',3.5) 和 和 牛顿 法 求 根 , 初 始点 是 3.5 


plot(xr2,w(xr2), 'rp'); 
plot(3.5,w(3.5), 'rp'); 
xr3 = newton( 'w',5.5) 秆 牛顿 法 求 根 , 初 始点 是 5.5 
plot(xr3,w(xr3), 'ro'): 
plot(5.5,.w(5.5), 'ro'); 


运行 程 订 ,输出 结 末 如 下 : 


Ly ll 


.1462 


. 1462 


b 
ty | 


. 1462 


输出 图 形 如 图 9-6 所 示 。 


0 22 24 26 28 30 32 34 36 38 40 
=x—log(x)-—2 


图 9-6 牛顿 兴 代 法 求解 结果 


【 例 9-5】 设 f(r) 二 (zx 一 a 六 , 写 出 f(z) 二 0 的 牛顿 迭代 格式 ,并 证 明 该 迭代 格式 
是 线性 收敛 的 。 
由 牛顿 狗 代 公式 ,首先 求 得 
FPC(zr) 一 2X3Xze(r 一 aa) 一 6zr5 一 6azr: 
牛顿 迫 代 格式 : 
Fay (zs 一 0)2 5zrz 十 a 


= f(r) “- 6zxi(z3—a) 6zn 


中 f(x)=0 得 ,x 二 Va 。 由 xz,4i 一 记 xz, 十 2297, 可 得 


2, a 
i 


wn 一 一 


5 | 7 
p(T) = GT 十 
求 p(T) 导 数 , 编 程 如 下 : 


clc,clear,close all 
Symsaxx 

SS fai= 5/6x% x+a/6 Xx 人 XxX; 
diff('S/6 x% x+ a/6/x/x', x) 
pretty(ans) 


运行 程序 ,输出 结果 如 下 : 


NS 一 


5/6 — a/(3*x x*3) 


4 
上 

线 
性 


方 
各 


组 
求 
解 


让 
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由 可 知 


四 人 
9 (T) 一 6 3 


| we (Va) = | a |= 0.5<<1 


wet 


因此 牛顿 迭代 是 局 部 收 钱 的 ,又 因为 + 二 Va 是 f(x) 二 0 的 三 重 根 ,因此 牛顿 迭代 不 
是 平方 收 伍 , 放 为 线性 收敛 。 
【 例 9-6〗 用 牛顿 迭代 法 求 下 列 方程 组 在 (1,1) 处 的 解 。 
[1 (x1sX2) = XI 二 xi—5=0 


4 
| ,zz) 一 (Tl 二 17r 一 (人 (37zl 十 1) 一 0 
由 上 式 , 设 
f(x) 一 i | | 
| -一 1 )xs [二 二 (3T1 十 ] ) 
则 重力 夫人 代 窍 阵 为 


fF (x) = | | 
Ta | Tl 


1 
由 初始 值 z* 一 | |, 故 牛顿 迁 代 方程 组 为 


fr) |， = 
他, 1:1) RR — ft 《1 13》 
由 此 求解 上 述 方 程 , 编 程 如 下 : 


clc,clear,close all 
format rat 
A=|2,2;— 2,2]; 
B=[ -3;—2]; 

xX= A\B 


= 
= TV/ 
— 5/4 
整理 得 
AXl 一 一 Axs 一 — 


则 相应 的 初始 值 进入 下 一 轮 运 代 :编程 如 下 : 


clc,clear,close all 
format rat 


xl1 = 3/A;x2 =— 1/4; 

A= [2x% x1,2 Xx2;xX2— 3,xl1++1|]:; 
B=[ -35/8; - 59/16]; 

XxX 二 及 


ee 
— 19/2 
一 79/4 
整理 得 
Ari 一 二 Az: 一 二 全 


由 此 友人 代 算法 编程 如 下 : 


clc,clear,close all 
format rat 
syms Xl] x2 
-4 = | 
fx0O= [xO0(1,:).*2+ x0(2,:}.*2—-5; (x0(1,:}+1). x xO(2,:)— (3x xO(l1,:)+1)]; 名 正 { 记 )} 的 慎 
fx= [xl1.*2+ x2.*+2—-5; (xl+i+1) x x2— (3x x1+1)]:; 
dfx = [2 x1, 2 x2; KX2— 3, xl+i+1]|:; 
for i=1:5 
xl1] = x0(1,1).; 
x2 = x0(2,1); 
A= [2 x1 2%* x2; x2— 3 x11+11; 
B=1xl "2 T2222 5 Ixl Tl ro — 14x LT11|- 
dx0 = A\B; 
xO{: ,1+1)= x0(:,1i} + dx0; 
fax0O(:3 iT1}=[x0(l,1i+1)."21+30(2,.11+1).*2—5; [x0{(1l1.T+t1i)+t1). x xOl2,1i1T1)-—- (3 0 
[LT Ti 竺 于 (X) 的 值 
end 
format short 
xO 御 根 
ee f(x) 的 值 
Ex0 = [x0(1,:).*2+x0(2,:).*2—-5; (x0(1,:)+1). x x0(2,:)—- (3 x0(1,:)}+1)] 村 王 (xz 的 值 


运行 程 订 ,输出 结 末 如 下 : 


XU = 
3/4 — 35/4 — 1926/145 — 3137/156 — 4950/163 
— 1/4 — 20 一 1997/67 一 10423/234 — 20333/305 
fxO = 
1.0e+03 x 
-0.0030 一 0.0044 0. 4716 1.0598 2.3834 5. 3615 
-0.0020 ”一 0.0037 0. 1802 0. 4049 0.9105 2.0479 
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可 知 , 牛 顿 算法 在 此 并 不 合适 , 求 得 解 发 散 。 
9.2 高 斯 消 元 法 


局 斯 (Gauss) 消 元 法 的 基本 思想 是 : 和 完 偿 次 消去 变量 ,将 方程 组 化 成 同 解 的 上 三 角形 
方程 组 ,此 过 程 称 为 消 元 过 程 。 然 后 按 方 程 相 反 顺 友 求 解 上 三 角形 方程 组 ,得 到 原 方程 
组 的 解 : 此 过 程 称 为 回 代 过 程 。 

对 于 局 斯 消 元 法 ,总结 一 般 的 求解 步骤 ,如 以 下 四 阶 方程 组 。 


r 7 1 1Yy 
Ull X11 十 Ciz Xz 十 人 13 Ts 


C1y C1y 
Tai x4 = 61 


Fb (1) Cy | 
AA21 TX1 azz Xo a 3 Ta 4 = bs 


Db C1) CY 1) __ 1(3) 
| | jz Bf = C33 了 二 C34 td Ds 
| 


(yy (C1) GD op 
al 1 十 wz 十 ca Ts TF aa Ta = ba 


则 有 高 斯 消 元 法 最 终结 来 如 下 : 


. _€1) C1) C1) C1Y 《17》 rly 
[11ll 二 1 厂 Cr12 .十 2 | oe 号 省 Clk -tk | | | 和 in ee bi 


Ca) (C2) 


(2) . (C2) 2) 
22 Ta TT a TR 2kT1Y -二 天 十 1 TT a2 Tn = 03 


‘RY 


[| 有 2 ChY ky 
< 二 此 十 Ct EET1) Et] 于 各 kn Cm CO DE 


a shH 十 … 十 CR 一 bi” 
[an zs 二 "十 azrn = be 

使 得 矩阵 左下 角 值 全 为 0, 然 后 依次 求解 每 个 值 。 

在 MATLAB 中 编程 实现 的 高 斯 消 元 法 的 困 数 为 gauss_x() 。 
功能 : 用 高 斯 消 元 法 求 未 知 量 值 。 

调用 格式 : 


x = gauss x(A,B) 


其 中 ,4 为 力 数 系数 矩阵 ; B 为 限 数 值 和 矩阵 ; z+ 为 求 得 的 未 各 量 值 。 
编写 局 斯 消 元 法 一 般 化 程序 如 下 : 


function x = gauss x(A,B) 
委 下 为 函数 系数 矩阵 

委 也 为 函数 值 拭 阵 

入 为 求 得 的 未 知 量 值 
format rat 

C = [A,B]; 


ne = size(C):; 秆 求 C 的 行列 数 
forj= 1 :nc(1i,2)-2 委 列 数 
EL ET ml 工 第 行 数 
ER en Al Ci CG(i 1 生生 和 元 环 讲 和 消 元 全 
end 


end 


switch nec(1,1) 


case 1 $1 个 未 知 数 求 解 ,1 阶 方 程 
x(1) = C(1,end)/C(1,end— 1); 下 
Case 2 多 和 个 未 知 数 求解 ,2 阶 方程 全 
x(2) = C(2, end)/C(2,end— 1); 绅 | 
xfl) = ( C(l,end) —- C(1,end— 1) * x(2) )/ C(1,end— 2); 及 
x= [x(1) ;x(2)]; 解 
case 3 名 3 个 未 知 数 求解 ,3 阶 方程 


xf3) = C(3,end) /CcC(3,end— 1); 

xf2) ( C(2,end) — C(2,end— 1) * x(3) )/ C(2,end— 2):; 

xfl) = ( C(l,end) — C(l,end—1)*x(3)— C(1l,end— 2) x x(2))/ C(1,end— 3); 

x= [x(1);x(2);x(3)|]; 

case 4 秆 4 个 未 知 数 求解 ,4 阶 方程 

x(4) C(4, end)/C(4,end— 1); 

x(3) = ( C{(3,end) — C{(3,end— 1}) x* x(4) }/ C(3,end— 2):; 

x(2) = ( C(2,end) — C(2,end— 1) x x(4)} — C(2,end — 2) ¥ x(3}))/ C(2,end— 3):; 

x(1) = (Cllend) — C(1l,end—1) x x(4)} 一 C(l,end— 2) x x(3) — C(1,end— 3) x x(2)})/ 
C(1,end— 4); 

x= [x(1) ;x(2);x(3);x(d)]; 

Case 5 和 5 个 未 知 数 求解 ,5 阶 方程 

x(5) C(5, end) /C(5.,end— 1); 

x(4) = ( C(4,end) — C{l4,end— 1) x x(5) }/ C(4,end— 2):; 

x(3) = ( C(3,end) — C(3,end— 1) x x(5} — C(3,end — 2}) ¥ x(4))/ C(3,end— 3):; 

x(2) = ( C(2,end) — C(2,end— 1) x x(5)} — C(2,end— 2) x x(4) — C(2,end— 3) x x(3)})/ 
C(2,end— 4); 

x(1) ( Cll,end}) — C(l,end—1)} x* x(5})} — C(1,end— 2) x* x(4) — C(1,end — 3) x x(3) 一 
C(1,end— 4) x x(2)})/ CcC(1, end— 5); 

x= [x(1) ;x(2);x(3) ;x(d);x(5)]; 


end 
end 


【 例 9-7】 用 高 斯 消 元 法 求解 下 列 方程 组 : 


6 zz 一 8 
1 4 —z|Izx= 


由 方程 组 写成 矩阵 得 
6 2 一 1 —3 
1 4 一 2 
[一 3 1 4 
采用 gauss_x() 盟 数 进 行 求解 ,程序 如 下 : 


clc,clear,close all 
format rat.; 


A= [62 一 1; 竺 方 程 系数 矩阵 
14 一 2; 
—314]: 
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BL 三 【一 3 2 竺 廊 程 右边 B 佐 阵 
| Kl] 


gauss Xx(A,B]) 


运行 程序 ,输出 结果 如 下 : 


Xl] = 
— 8/11 
| 80/99 
25/99 


【 例 9-8〗 用 列 主 元 融 斯 消 元 法 求解 下 列 方程 组 : 
一 37 十 2rz 十 rz 一 4 
人 
Drl 一 工 z 十 DT 一 

由 方程 组 写成 矩阵 得 


= 2 6 4 
' 10 一 7 0 7 
CS ic 


对 该 方程 组 进行 求解 ,编程 如 下 : 


clc,clear,close all 

format short 

A=|[ -3,2,6;10,—7,0;5, -1,5]:; 
B=|[4;7;6]; 

x= gauss x(A,B) 


运行 程 订 ,输出 结 末 如 下 : 


9.3 候 赶 法 


在 很 多 问题 中 ,需要 解 如 下 形式 的 三 对 角 方 程 组 : 
fizl 十 clzs 一 cd 
az TX1 十 pzzrz 十 czza = ds 
aazz 十 Dazas 十 caz4 = ds 
全 1 无 十 1 无 1 十 性 1 无 一 过 1 


| Sl he 3 : 


三 对 有 角 方 程 组 的 系数 矩阵 为 三 对 角 阵 :对 于 这 种 特殊 而 又 侧 单 的 方程 组 ,充分 注意 
到 三 对 角 方程 组 的 特点 ;根据 顺序 消 元 的 思想 导出 一 个 何人 便 的 算法 一 一 授 赶 法 。 
自 先 进行 顺 厅 消 元 , 且 每 步 将 主 元 系数 化 为 1, 将 方程 组 化 为 廊 


程 
[XxX1 qixzs = pi 组 
Taz 十 qzzra 一 轧 : 求 


二 和 解 
(x» = 力 。 
式 中 


d 。 i 
pi 和 3 di 和 ， ps A Ok — 一 ， Lk 一 De CO— dd 1， a 一 一 pA 
pb] pi te ti, 
然后 回 代 , 求 得 
[TZ 一 pn 


Ee 一 pr aT REI 
追赶 法 和 高 斯 消 元 法 本 质 一 样 。 
在 MATLAB 中 编程 实现 的 追赶 法 的 图 数 为 zgf_x() 。 
功能 : 用 追赶 法 求 未 知 量 值 。 
调用 格式 : 


xX = zgf x(A,B) 


其 中 ,A 为 限 数 系数 矩阵 ; B 为 孙 数 值 矩 阵 ; x 为 求 得 的 未 各 量 仁 。 
编写 退 赶 法 一 般 化 程序 如 下 : 


function x = zgf x(A,B) 
备 中 为 函数 系数 矩阵 

第 忆 为 函数 值 矩 阵 
format rat 

C= [A,B]; 


nc = size(C); 先 求 C 的 行列 数 
forj= 1: nc(1,2)-2 第 列 数 
ori= tl nall 1 多 行 数 


ET 
ctir:) = 一 Cj jcli jj .secCci:) + Cjv:)7 先 每 行 元 闲 进 行 消 元 法 


else 
end 
end 
end 
switch nec(1,1) 
case 1 和 1 个 未 知 数 求 解 ,1 阶 方程 
x(1) = C(1,end)/C(1, end— 1); 
case 2 和 2 个 未 知 数 求 解 ,2 阶 方程 


x(2) = C(2, end}/C(2,end— 1): 
x(1) = ( C(1l,end) — C(1l,end— 1) * x(2) }/ C(1,end— 2): 
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x= [x(1);x(2) |]; 
case 3 当 3 了 3 小 未 知 数 求解 ,3 阶 方程 
x(3) = C(3, end}) /C(3.,end— 1); 
x(2) ( C(2,end) — C(2,end— 1) x x(3) )/ C(2,end— 2):; 
x(1) = ( C(1i,end) — C(1,end— 1) x x(3} — C(1, end— 2) x x(2))/ C(1, end— 3): 
= Ti 
case 4 第 4 个 未 知 数 求解 ,4 阶 方 程 
x(4) = C(l4d, end) /CcC(4,end— 1):; 


x(3) = ( C(3,end) — C(3,end— 1) * x(4) )/ C(3,end— 2): 
x(2) = ( C(2,end) — C(2,end— 1) x x(4)} — C(2,end — 2) ¥ x(3))/ C(2,end— 3):; 
x(1) = (Clend) 一 Clend 一 1) 关 xd4) 一 ClLend 一 2) x x(3) — CcC(1,end— 3) x x(2})})/ 


C(1,end— 4): 

x=[x(1) ;x(2);x(3);x(4)]; 

Case 5 和 5 个 未 知 数 求解 ,5 阶 方 程 

x(5) = C(5, end) /CcC(5,end— 1):; 

x(4) ( C(4,end) — C(4,end— 1) x x(5) )/ C(4,end— 2):; 

x(3) ( C(3,end) —- C(3,end— 1) x*x(5)— C(3,end— 2) * x(4))/ C(3,end— 3); 

x(2) = ( C(2,end) — C(2,end — 1) x x(5})} — C(2,end— 2) x x(4) — CcC(2,end— 3) x x(3})})/ 
C(2,end— 4):; 

xl = (Clend) -CcC(l1,end— 1) x x(5} — C(1, end — 2}) x x(4})} — C(1,end — 3) 关 开 (3) 一 
C(1,end— 4) * x(2))/ C(1, end— 5); 

x= [x(1) ;x(2);x(3);x(4);x(5)]; 


end 


end 


【 例 9-9】 用 追赶 法 解 下 列 方程 组 : 


对 该 方程 组 进行 求解 ,编程 如 下 : 


clce,clear,close all 

format short 

A=[2:1.0.0; 12 3.0;:03 = 一 了 了 47 0,0,2.5|; 
B= 13.— 3 10:21|. 

X= A\B 

xX = zgf x(A, B) 


\ 2T1 十 X22 = 二 3 

’ | -Tz 一 zz 一 一 了 
| 汉 — 7xs 二 4x =— 10 
/ 2T3 十 5 一 2 
整理 成 和 矩阵 形式 得 

\ 0 0 3 

| -3 0 一 : 

\ | 一 访 

\ 2 5 2 


运行 程序 ,输出 结 采 如 下 : 


2 性 
方 
1 
组 

水 

忆 


9.4 汇 数 


元 


方程 组 的 解 为 一 组 数 , 称 为 解 回 量 : 近 似 解 回 量 与 准确 解 回 量 之 差 称 为 误差 回 量 。 
为 了 合计 误差 回 量 的 大 小 , 则 需 引 入 衡量 和 器 量 写 和 矩阵 大 小 的 度量 一 一 郊 数 。 
设 XX (XT1 vs sn yy"* " 芝 用 的 回 量 红 数 有 


一 WzxI 十 Xx 十 x 十 十 x ，。 xl 三 | wi | 十 | zz | 十 … 十 | wn |， 


lx| -= max|zxi | 
分 别称 为 向 量 x 的 2 范 数 .1 范 数 .无 穷 范 数 。 
常用 的 和 矩阵 范 数 有 


上 141 = max > ， | er | 为 最 大 行 和 ; A]1 = max > ， | az | 为 最 大 列 和 ; 4|| :一 
li 一 ] La 二] 


vi il 为 4I4 的 最 大 特征 值 。 
在 MATLAB 中 编程 实现 的 荡 数 求解 的 函数 为 fanshu() 。 
功能 : 求 矩 阵 范 数值 (1 范 数 .2 范 数 、 无 穷 范 数 ) 。 
调用 格式 : 


[£1,f2,fwq] = fanshu(A) 


其 中 ,4 为 输入 矩阵 ; 刻 为 1 范 数 ; fz 为 2 苑 数 ; fwq 为 无 穷 范 数 。 
编写 求 算 阵 范 数值 一 般 化 程序 如 下 : 


function [fl1,f2,fwql] = fanshul(A) 
和 及 为 输入 矩阵 

第 于 为 11 范 数 

第 f2 为 2 范 数 

和 fwq 为 无 穷 范 数 

n= size(BA); 

fori=1:n(l1,1) 

Ah(1,1) = (sum(A(1, :))); 

end 

fwq = max(Ah); 最 大 行 和 
fori=1:n(l1,2) 

Al(1,1)= (sum(A(:,1))); 

end 


fi = max(Al):; 当 最 大 列 和 
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B=A'x A; 

lamda = eig(B); 特征 值 
lamdal = abs(max( lamda)).; 

f2 = sqrt(lamdal ); 物 2 范 数 


| ee | 2 
【 例 9-10】 设 4 一 | 。 |,x 一 |。|, 求 141 和 上 Ax |,, 其 中 pp 一 1,2,， 


局 
二 
由 范 数 性 质 易 知 
上 14 = 6， Ix|1 = 5; 上 14| 


对 于 2 范 数 而 言 , 有 
Te 5 11 
ATA 一 = 
1 5Jl2 5 11 26 


YE 


编写 程序 如 下 : 


clc,clear,close all 

和 A.Ax 为 输入 矩阵 

向 fAl1 .fAxl 汶 1 范 执 

第 fA2 .fAx2 为 2 范 数 

对 fAwq .fAxwq 为 无 穷 范 数 
n= [1l1:2.35|]; 

x — [2r3]" 

hx = XxX; 

n= size(B); 

[fAl1,fA2,fAwq] = fanshu(A) 
[fAx], fAx2,fAxwql] = fanshul( Ax) 


运行 程序 ,输出 结果 如 下 : 


: 
ll 


1607/290 


fAx2?2 = 
1607/290 
fAxwd = 
7 
计算 结果 和 理论 计算 是 一 致 的 。 
3 1 2 nt 
= a 


由 范 数 性 质 可 知 
lxli=8, 141= 王 6， xzl- 一 5， 41- 一 7 


,|, 求 相应 的 各 范 数 。 


渤 国 衬 贷 硅 入 现 (如 ) 从 及- ee ee 症 和 因 


| me 
1 
。 
0 


DO 0 
2 4 
—2 4 


1 
。 


了 程序 .输出 结果 如 下 : 


-只 


计算 结果 和 理论 计算 是 一 致 的 。 


由 此 编写 程序 如 下 : 
【 例 9-12】 设 A 
由 范 数 性 质 可 知 
编写 程序 如 下 : 


运 
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clc,clear,close all 

和 及 为 输入 矩阵 

和 fAl 为 1 范 数 

秆 fA2 为 2 范 数 

千 fAwq 为 无 穷 范 数 

B= [1,0,0;0,2,4;0, -~ 2,4]; 
n= size(n): 

[fAl,fA2,fAwq] = fanshu(A) 


运行 程序 ， 拓 出 结果 如 下 : 


fAl = 
8 
二 中 2 三 
6726/1189 
fAwq = 
6 


计算 结果 和 理论 计算 是 一 致 的 。 


9.5 方程 组 的 性 态 


当 方程 组 Ax 一 b 的 系数 矩阵 与 右 端 向 量 5 的 微小 变动 (小 扰动 ) 而 引起 解严 重 失真 
时 , 称 此 方程 组 为 病态 方程 组 ,其 系数 矩阵 4 称 为 病态 矩阵 ,否则 称 为 良 态 方程 组 ,4 称 
为 良 态 矩 阵 。 

(1) 设 b 有 扰动 6b;A 为 准确 ,x 的 扰动 为 6x; 即 

A(x++ dr) = b+ 

由 Ax 二 b 可 得 下 式 : 
{oe | ee sm | 入 本 人 lapl ~ LE eg 

此 不 等 式 表 明 , 当 右 端 项 有 扰动 时 , 解 的 相对 误差 不 超过 5 的 相对 误差 的 
141 中 4! 中 | 倍 。 

(2) 当 b 为 精确 的 而 A 有 微小 扰动 64 时 ,在 64 充分 小 时 也 同样 可 推 得 


orl aa 
A A 
Txi 和 4114 | 1 


《3) 当 A,b J 64 ,6b 时 , 则 可 进一步 导出 更 一 般 的 误差 估计 式 : 


| 5b | 
| 五 | 


四 本 四 | “41 5 
wire 本 ie 息 及 b 的 相对 误差 的 关 
系 ; 数 上 A 中 A -| 越 小 , 解 的 相对 误差 也 越 小 ; 反之 , 数 上 A 中 4 | 越 大 , 解 的 相对 


误差 也 越 大 ,实际 上 ple 程 组 原始 数据 的 敏感 程度 ,揭示 了 和 窍 阵 4 和 方 
程 组 本 号 的 性 态 , 称 之 为 方程 组 或 矩阵 4 的 条 件数 , 记 作 


起 
也 
cond(4) 一 ‖ 4 4 一 | tt 
cond(4) 越 大 ,4 的 病态 程度 越 严 重 。 至 于 cond(4) 多 大 才 算 病态 ,这 是 一 个 相对 概 


念 ,没有 一 个 严格 的 数量 界限 ， 
在 MATLAB 中 编程 实现 的 矩阵 条 件数 求解 的 函数 为 bt() 。 
功能 : 求 矩 阵 条 件数 值 。 


调用 格式 : 解 
cond = bt(A) 


其 中 .A 为 输入 答 阵 ; cond 为 返回 条 件数 。 
编写 求 矩 阵 条 件数 一 般 化 程 友 如下: 


function cond = bt(A) 
第 五 为 输入 矩阵 
第 cond 为 返回 条 件数 
global a 
syms a 
n= size(A); 
for i=1:n(l1,1) 
Ah(1,1)= (sum(A(i, :))); 
end 
fwqA = max(Ah); 和 最 大 行 和 ,无 穷 范 数 
B = inv(A). 
n= size(B}); 
for i=1:n(l1,1) 
Bh{(1,1i) = (sum(B(i, :))):; 
end 
fwqB = max!(Bh); 竺 最 大 行 和 ,无 穷 范 数 
Cond = fwqA *% fwqB; 


2a a 0 
【 例 9-13】 设 A 一 10 a 0|, 试 说 明 对 任意 实数 a 关 0,; 线 性 方程 组 Ax 二 b 都 是 非 
(0) 0 a 


病态 的 。 
当 a 宇 0 时 , 取 4 二 3, 由 范 数 性 质 可 知 上 A 1 一 34。 
求 矩 阵 的 逆 , 编 程 如 下 : 


clc,clear, close all 


syms a 
A= [2xa,a,0;0,a,0;0,0,al; 
B= inv(A) 


运行 程 厅 , 输 出 结 末 如 下 : 


B = 
[ i/(2xa), -1/(2 x a), 0] 
[ 0, l/a, 0] 


[ 0, 0, 1/al 
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整理 结果 得 
1 一 1 ，» 
Aa 2a 9 
A1=|0 - 0 
CL 
o 0o i 
人 
由 函数 性 质 可 知 
到 ] 
14 = 一 一 
Ct 
则 


cond(4)- = 4- A -一 3c。 一 一 3 


因此 该 方程 是 良 态 的 。 

当 a 二 0 时 , 取 4 二 一 3, 由 范 数 性 质 可 知 上 A 二 a,; 上 4 及“ 二 0,; 则 A 的 条 件数 为 
condCA)s = A A ,=a*0=0 

条 件数 均 相 对 较 小 , 故 该 矩阵 是 恨 态 的 。 

编写 调用 可 执行 程序 如 下 : 


clc,clear,close all 

当 五 为 输入 和 矩阵 

第 cond,cond2 为 返回 条 件数 
global a 

a 三 3; 
A=[2x*a,a0;0,a,0;0,0,a]; 
cond = bt(A) 

a = 一 3; 
A=[2x*a,a0;0,a,0;0,0,al]; 
cond2 = bt(A) 


运行 程 订 ,输出 结 来 如 下 : 


COnd = 


【 例 9-14 给 定 线 性 方程 组 : 

1 = [] 

将 上 式 的 第 一 个 式 子 同 冬 以 A(MA 关 0) ,得 到 
=] 


则 上 陈 称 为 系数 窍 阵 A(2)。 


分 别 求 其 cond(4(4))=, 求 4 使 得 cond(4(4))s 最 小 值 。 
由 目标 方程 可 知 


-> g 
A(X) = | z | 程 
1 1 组 
求 矩 阵 的 逆 ,编程 如 下 : 求 
解 
clc,clear,close all 
syms a 
A=[2xa,a;l,1 |; 
B= inv(A) 
运行 程序 ,输出 结果 如 下 : 
已 三 
| 1 /av eu 
[ — 1/a, 2|] 
整理 结果 有 
| 
A 
4CA) .= z 
1 | 
一 二 2 
A 
由 范 数 性 质 可 得 相应 的 条 件数 为 
由 
0 z i ee 
cond(ACQDD)5 = TAQ -A =- 一 2 0 过 本 
2 
| FE 和 A 二 0 
因此 
| 1， 人 一 
(cond(A(A)) ,nin 一 
a, A 二 0 


编号 调用 可 执行 程序 如 下 : 


Clce,clear,close all 


当 及 为 输入 和 矩阵 

第 condl .cond2 .cond3 为 返回 条 件数 
global a 

a 三 3; 


A=[2x*a,a;l,1 |; 
condl = bt(A) 
A= 1/3; 
na Ll 
cond2 = bt(A) 
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8 总 二 一 池 。 
' nl 
' cond3 = bt(A) 


| 运行 程序 ,输出 结果 如 下 : 


”9.6 高 斯 - 塞 德 尔 迭 代 法 


高 斯 - 塞 德 尔 (Gauss-Seidel) 进 代 格 式 为 


a 二 一 (一 Cly oo -人 13. 基 3 = 一 人 十 pi] ) 

人 11 

大 1) 一 一 (一 Co 工人 1 一 C23 工 多 一 。。 一 Co 十 站) 

人 22 

I cgt1ly _ 1 _ (ETH1) (E+1) 《RH1) 

“开交 一 一 《一 Qal 工 1 Un2C2 i ~ nCn—l1) Tal pn) 

1 人 

其 中 ,分 量 形式 为 

| ] i—1 再 , 

| Es 二 (一 > do > pe PE di by » 1 二],2,3,""*,n 

' Cis j=1 一 计 1 

I Ti 下 = 二 i wp i 和 ri ， 二 a je 证 - E 

采用 高 斯 老 德 尔 途 代 法 进行 求解 ,将 系数 窍 阵 4 分解 为 A4 二 D 一 L 一 U ,其 中 .: 
[an : 

' D 一 diag(kail s CL 22 i 5 Cm ) 一 一 这 

村 

| a 

Ull 

受 1 ] 1 E 

| D ” = diag( 一 ,一 ， … ,一 )= | 

| Ull U22 UL rm 

\ 1 

' Qe 

| | 0 I0 a U13 ln 
| 21 0 0 他 23 "** U2n 
| —L= |as asz 局 , UU 一 0 ， : 

| (nl1)n 
| Cnl Cn2 2 nCn—1) 0 () 


\ 其 矩阵 形式 如 下 : 


YetD 一 DICTx et 十 Tx ) 十 Dip ts 

—> Dx = Lx *t1? ey +b 

一 (万 一 工 )x =Ux"+b 

在 MATLAB 中 编程 实现 的 高 斯 - 塞 德尔 迭代 法 求解 的 函数 为 gauss_seidel_x() 。 


功能 : 采用 高 斯 - 塞 德尔 迭代 法 求 矩 阵 未 知 数 数值 。 未 
调用 格式 : 解 


x = gauss seidel x(A,B,x0,Err) 


其 中 ,A 为 方程 组 系数 矩阵 ; B 为 方程 组 值 ; ze 为 方程 组 系数 迭代 初始 值 ; Err 为 返 
加 精度 ; x 为 求解 结 来 。 

编写 高 斯 - 答 德 尔 迫 代 法 一 般 化 程序 如 下 : 

function x = gauss seidel x(AM,B, x0,Err) 


秆 股 为 方程 组 系数 矩阵 
第 B 为 方程 组 值 


千 x0 为 初 值 

第 Err 为 求解 精度 

D = diag(diag(A) ) ; 秆 提取 A 中 

L = —tril(lA}) +D:; 守 求 下 三 角 算 阵 

U = -triu(lA)} +D:; 竺 求 上 三 角 和 矩阵 

DL = 了 一 工 ; 

A DL = inv(DL) ; 向 求 庶 

x0; 秆 坟 彻 慎 

X= A DLxUx x0+A DL B; 

while norm(x— x0)> Err 第 d 当 两 次 计算 结果 2 范 数 小 于 Err 退出 循环 体 
X= XO; 
x0 = A DLx Uxx+A DDLxB; 

end 


【 例 9-15】 用 高 斯 - 窒 德 尔 迭 代 法 求解 下 列 方程 组 : 


G:. 2 = [= 
1] 4 一 2| 工 一 2 
nt | 4 4 
由 上 述 方程 组 可 得 
[6 0 0 
D—L= |l1 4 0 
[2 2 4 


赋 初 值 
一人 0 25|” 
采用 gauss_seidel _x() 图 数 进 行 求解 ,程序 如 下 : 


Clce,clear, close all 
format short.; 
N= | 在 之 二 一 > 

4, 和 
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— 3,1,4]; 当 方程 组 系数 矩阵 
= [一 3v2v 4 ': 

-5 0291 

一 宣德 尔 求解 

= gauss seidel x(A,b, x0, eps ) 


a 1 
申 一 


运行 程序, 输出 结 采 如 下 : 


-0.1213 
0.8081 
.29523 


【 例 9-16】 用 高 斯 - 窒 德 尔 迭 代 法 求解 下 列 方程 组 : 


Cr 


1 0 
op 
3 1 


了 (0) [ 一 0.5 ,1. 1 | 
采用 gauss_seidel_x() 函数 进行 求解 ,程序 如 下 ; 


由 上 述 方 程 组 可 得 


赋 初 值 


clc,clear,close all 
format short.; 


Rn = [13; 争 方程 组 系数 矩阵 
全 
B= [4,6]": 第 方程 组 吉 廊 BB 矩阵 


w= [0051 11 
和 高 斯 - 塞 德尔 求解 
x2 = gauss seidel x(A,B, x0, eps) 


运行 程 厅 , 输 出 结果 如 下 : 
Inf 
Inf 
由 计算 结 采 可 知 , 该 方程 采用 高 斯 - 窒 德 尔 迭 代 法 求解 发 散 。 
9.7 迁 代 法 的 收敛 性 


设 A 为 n 阶 方 阵 ,Xi;(i 二 1,2,3,…,n) 为 4 的 特征 值 , 称 特征 值 模 的 最 大 值 为 矩阵 4 
的 谱 半 径 , 记 为 


o(A) = max\ | Ai |}? 

式 中 ,Ca ,az ,… ,An) 称 为 矩阵 A 的 谱 。 性 
矩阵 4 的 谱 半 径 与 4 的 范 数 之 间 的 一 个 重要 关系 : 4 的 谱 半 径 不 超过 4 的 任 一 种 击 

范 数 . 即 组 
pC4) 去 1 4 1 时 

设 4 为 ” 阶 方 阵 , 当 采用 高 斯 - 塞 德尔 迭代 法 的 收敛 条 件 为 角 
limA” = 0 一 一 一 一 oo(4) 一 1 


对 于 任意 初始 向 量 x” 和 右 端 项 g, 由 迭代 格式 : 
X = Mx 二 +g, k=0,1,2,3,. 
则 {x } 收 敛 的 充分 必要 条 件 为 pC(M) 二 1. 
在 MATLAB 中 编程 实现 的 矩阵 收 伍 性 判断 求解 的 因数 为 slx() 。 
功能 : 采用 高 斯 - 窄 德 尔 迫 代 法 求 矩 阵 未 知 数 数值 的 收 钱 性 判断 。 
调用 格式 : 
rouM = slx( A) 
其 中 ,A 为 输入 窍 阵 ; rouM 为 求解 结果 p(MD)， 
编写 高 斯 - 窒 德 尔 达 代 法 一 般 化 程序 如 下 : 


function rouM = slx(A) 


和 及 为 输入 矩阵 

D = diag(diag(A) ) 7 秆 提取 A 中 

EL 三 — tril(n}+D: 竺 求 下 三 角 和 矩阵 
U = -triu(A)+D:; 竺 来 上 三 角 拢 阵 
DL = 站 一 工 ; 

ADL = inv(DL):; 先 求 递 

M = A DL*U; 


lamda = eig(M):; 
rouM = max( lamda ):; 
IE rouM>=1 
disp( ' 高 斯 一 塞 德 尔 迁 代 法 发 散 ') 
el]se 
disp( ' 高 斯 一 塞 德 汞 选 代 法 收效 ') 


end 


【 例 9-173】 设 线 性 方程 组 : 
(Ti 一 2 一 2 一 1] 
| | i, | Ta 二 2 , 玉 用 高 斯 - 罕 德 尔 渴 代 法 进行 求解 。 


(2 XI] | 2 T2 1 XT3 王 3 


1] 0 0 
将 系数 矩阵 A 分解 为 4 二 D 一 LL 一 U, 则 可 知 (D 一 L) 二 |1 1 0|,U= 
2 六 
2 - 
0 一 1| ,求解 CD 一 工 ) : ， 
LO 0 0 


29 才 


”292| 
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编程 如 下 : 
clc,clear,cCclose all 


DETIOUI i022 1]: 
inv (DL) 


ans = 
1 0 0 
-1 1 
0 一 2 1 


整理 结果 得 相应 的 特征 方程 为 
A 
det(AI— M)}= |0 1 一 2 3 — (4—2)? 二 0 
0 ; 


调用 slx6) 因数 计算 其 特征 根 如 下 : 


clc,clear,close all 
l= |1.2.— 2 

li es 

en | 于 
rouM = slx(A) 


Jamda = 

0 

2 

2 
高 斯 一 塞 德尔 选 代 法 发 散 
IOUM = 

之 


町 得 A1 二 0 ,Xz 二 2,hs 二 2, 故 oOWM) 一 2 盖 1, 可 推 得 高 斯 - 塞 
【 例 9-18】 设 线 性 方程 组 : 
| 一 一 一 
< 一 工 ( 十 8rr 十 0O07zg 一 了 
IE 上 OOzy 十 9zri 一 名 
此 时 该 方程 的 系数 为 


求 该 系数 矩阵 的 特征 值 ,编程 如 下 : 


Clc,clear,close all 
n=19r J 1 180 “L109| 


eig(A) 方 
运行 程序 ,输出 结果 如 下 : 组 
求 
AnNs = 解 
了 .1981 
8. 5550 
10.2470 


调用 slx 〇 函数 计算 如 下 : 


Clc,clear,close all 
A= [93, SE 1 ss ji SE 1,8, 0; a 1,.0.,91; 
rouM = slx(A) 


lamda = 
0 
17/648 
1/576460752303423490 
高 斯 一 塞 德 尔 迭 代 法 收效 
rouM = 
17/648 


由 此 可 知 , 该 系数 矩阵 为 正定 且 对 称 , 则 高 斯 - 塞 德尔 迭代 法 收敛 。 
【 例 9-19】 讨论 当 参 数 a 取 什 么 值 时 .用 高 斯 - 塞 德尔 迭代 法 计算 Ax 一 b 时 收敛 。 
| 


Tl] O07 
z a 
Cl1) 4 一 | | (2) A 二 |a | a 
a 1 
I 本 再 


当 采 用 壕 代 法 时 ,要 使 得 系数 和 矩 阵 收敛 , 则 算 阵 为 正定 时 ,和 矩阵 渤 代 必定 收敛 , 即 相 
应 的 特征 只 满足 收敛 即 可 ，。 
调用 slx0 〇 了 钠 数 计算 如 下 : 


clc,clear,close all 
2 

mL aa ll， 

aM2 = [lil,a,0;a,l,a;0,a,l |:; 
rouMl = slx(Al) 

rouM2 = slx(A2) 


运行 程序 ,输出 结果 如 下 : 
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Jamda = 

0 

1/4 
高 斯 - 塞 德尔 迁 代 法 收 化 
IOUM] = 


Jamda = 

0 

1/2 

0 
高 斯 一 塞 德尔 选 代 法 收 化 
rouM2 = 

1/2 


9.8 雅 可 比 和 迭代 法 


设 有 7 阶 线 性 方程 组 : 
| 十 aizzrs 十 十 ar 一 六 


21C]1 | C22 .本 十 I -一 六， 


| 一 


由 此 可 建立 迭代 格式 ， 


1 

《REHI)》 _ rr Ck) CE) LE | Vy/ 

: | 1 < ( Hl W133 i 十 b1) /a 
CEF1)Y __ CRY (Ck) = Ck) 

-< 十 2 (— qalzi U23d3 amti n | D2) /a22 
| 


CE __ CA EY | FE | | {EY >» 
| ( tinl tl1 nz 2 tintn—l1) tn—1l | bY) om 


简 记 为 


1 一 】 证 
1 一 一 | 一 >》 aa 人 一 dsr 二 bi|， zz 一 1 237 
四 | J 好 了 
Ui \ j=1 了 一 计 ]1 


在 MATLAB 中 编程 实现 的 雅 可 比 (Jacobi) 迁 代 法 晴 数 为 jacobi(C ) 。 

功能 : 用 雅 可 比 迭 代 法 求 线 性 方程 组 Ax =b 的 解 。 

调用 格式 ， 

[x,n| = Jacobi (A, b, x0, eps, varargin) 
’ 其 中 ,A 为 线性 方程 组 的 系数 矩阵 ; b 为 线性 方程 组 中 的 常数 回 量 ; xo 为 迭 代 初 始 
\ 回 量 ; eps 为 解 的 精度 控制 (此 参数 可 选 ); varargin 为 从 代 步 数 控制 (此 参数 可 选 ); x 为 
线性 方程 组 的 解 ; 2 为 求 出 所 需 精 度 的 解 实际 的 迭代 步 数 ，。 

雅 可 比 迭 代 法 的 MATLAB 程序 代码 如 下 : 


function [x,n|] = jacobi(A,b,x0, eps, varargin) 


名 采用 雅 可 比 迭 代 法 求 线 性 方程 组 Mx =b 的 解 


> 代 刘 从 珊 (天 ) 兴 用 - ER | 和 


8 


7 


YQz1 一 Xs OO— Xa 
Tl 二 8xz 二 0x3 = 7 
tl 二 0xz 十 9xs 


| 


对 于 
采用 雅 可 比 矩阵 迭代 法 求解 


【 例 9-20] 了 】 
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运行 程序 ,输出 结果 如 下 : 


全 三 
1 
1 
1 
Ti 三 
9 
1 a 
【 例 9-21】 试 让 A 二 |la 1 
Ce et 


用 雅 可 比 迭代 法 求解 Ar 一 六 是 收敛 的 。 
由 系数 和 矩阵 A 对 于 一 0. 5 二 a 二 1 时 是 正定 的 ,可 得 |4E 一 4| 的 特征 根 大 于 0。 具 体 纺 
写 程 序 如 下 : 


clc,clear,close all 
syms lamda a 
A=[1aa; 

a, 1,a; 

a,a,1]; 


eig(A) 


1 一 1 一 ay As=1—a:; hs 一 264 十 1 
由 4 三 0 可 得 其 特征 方程 为 
A a a 
| AE—B|= detla—1 A aa 一 1 一 入 一 (3c&: 一 4 十 1)14 十 2a 一 4a 十 2 一 0 
Ia 一 1 ae 一 1 A 
编程 求解 如 下 : 
B= [lamda aai;a 一 1, 1amda,a 一 1;a 一 1,a 一 1,1amncdal]， 


C= det(B) 
solve(C, 'lamda') 


/ 输出 结果 如 下 : 


2%a3 — 3%a 人 "2% lamnda 一 4%a2 4a lamda+ti Za lamda*3 一 lamda 


IiS 一 

忌 一 荆 
((9xa o— 1)x (a 一 1))*(1/2)/2 - a/2 + 1/2 
1/2 — (ll9xa — 1)x(a 一 1))*(1/2)/2 一 a/2 


1 ww(K9a 一 1])4a 一 1) a 1 VC9a 一 1)(Cae 一 1) a 
Al1 一 ll, As 5 | 和 9? A3 5 0 2 


由 0 二 a 二 0.5,04B) 一 1, 因 此 采用 雅 可 比 迭 代 法 求解 4x 一 六 是 收敛 的 。 
| pi 1 
【 例 9-22】 对 方程 组 Ax 二 b,A 一 民 2 |,5= 网 谋 ww 取 何 值 时 ,使 得 采用 如 


下 迁 代 法 求解 收敛 。 
x 一 x 二 wAxr®b), k=0,1,2,3,. 
迭代 算 阵 为 


求 其 特征 值 ,编程 如 下 : 


clc,clear,close all 


SYImS Ww 
B=[l1+w2x wi0.3xwl+w|; 
eig(B) 


运行 程序 ,输出 结果 如 下 : 
ans = 


w — (15*(1/2) x w)/5 + 1 
w+ (15°(1/2) x w)/5 + 1 


整理 结果 有 
A1 一 记 一 一 一 十] ， Az 一 十 一 十] 
由 o(CB) 一 1 可 得 
一 1.127 < 一 取 一 0 


本 章 小 结 


本 章 基于 常见 的 数值 分 析 方法 ,分 析 了 递 推算 法 ,包括 循环 渤 代 、 送 代 收 剑 性 和 牛顿 
迭代 等 ,并 介绍 了 高 斯 消 元 法 以 及 追赶 法 、 范 数 的 性 质 、 方 程 组 的 性 态 、 高 斯 - 塞 德尔 和 雅 
可 比 和 迭代 法 等 。 针 对 数值 计算 方法 ,以 实例 讲解 ,更 加 具有 实用 性 和 针对 性 。 


过 党 ( 芝 ) 而 十 育 澡 韦 坊 目 站 


MATLAB 的 基本 数据 单位 是 矩阵 , 它 的 指令 表达 式 与 数学 .工程 
中 常用 的 形式 十 分 相似 。 本 章 侧重 于 最 优化 算法 的 MATLAB 实现 ， 
同时 精 选 了 大 量 的 最 优化 问题 实例 ,通过 实例 的 求解 ,生动 地 教会 读 
者 掌握 MATLAB 在 最 优化 问题 方面 的 应 用 。 最 优化 理论 和 方法 日 
益 受 到 重视 ,已 经 渗透 到 生产 .管理 商业、 军事 .决策 等 各 个 领域 ,应 
用 MATLAB 来 解决 最 优化 问题 ,通过 将 “最 优化 问题 MATLAB 优 
化 工具 箱 ” 和 “MATLAB 编程 "这 三 方面 有 机 结合 进行 讲述 ,来 快速 解 
决 最 优化 问题 。 

学 习 目标 : 

”熟练 掌握 MATLAB 优化 问题 求解 ; 

。 熟练 掌握 MATLAB 优化 工具 箱 函 数 的 使 用 ; 

。 熟练 掌握 线性 规划 、 非 线性 规划 和 最 小 二 乘 最 优等 问题 的 

求解 。 


10.1 线性 规划 问题 


线性 规划 问题 是 目标 肾 数 和 约束 条 件 均 为 线性 限 数 的 问题 ,在 
MATLAB R2016a 版 中 ,线性 规划 问题 Uinear programming) 已 用 哺 
数 jnprog() 取 代 了 了 MATLAB 7.0 版 中 的 lp 函数。 当然 ,由 于 版 本 
的 回 下 悦 容 性 ,一般 来 说 , 低 版 本 中 的 加 数 在 高 版 本 中 仍 可 使 用 ， 

图 数 : linprog 


>> help linprog 
linprog Linear programming. 
X = linprog (f, A, b) attempts to solve the linear programming 
problem: 


min f'**xXx subject to: AxxX<= b 


2 


格式 如 下 : 
(1) xx 一 linprog(f,A:,b)。 求 min Fx,xER". 


三 上 


(2) x 二 linprog(f, A,b,Aegq,;beq)。 等 式 约束 Aeq， x 一 beq; 关 没 有 不 等 式 约束 


A .x<b, 则 A=[ ],b=[ ]。 二 
(3) x 二 linprog(f, Ab,Aegq:beq,lb,ub)。 指 定 x 的 范围 ib 和 xz< 生 ub, 和 在 没有 等 式 约 中 
束 Aeq . x 一 beq, 则 Aeq 一 [ ],beq 一 [ ]。 各 
(4) x 二 linprog(f{,A,b,Aeg,begqg,lb,ub,x0)。 设置 初 值 xo。 组 
(5) x 一 linprog(f,A,b,Aeq,beq,lb,ub,x0,options)。options 为 指定 的 优化 参数 。 


(6) [x,fval] 一 linprog(*…)。 返 回 目 标 陋 数 最 优 值 ,好 fval 一 三 x。 
(7) |x,lambda,exitflag | 二 linprog(…)。lambda 为 解 x 的 拉 格 姑 日 乘 子 ， 
(8) [x, lambda,fval,exitflag | 二 linprog(…)。exitflag 为 终止 迁 代 的 错误 条 件 。 
(9) [x,fval, lambda.,exitflag,output | 一 linprog(…)。output 为 关于 优化 的 一 些 
信息 。 
说 明 : exitflag 二 0 表示 函数 收 钱 于 解 x; exitflag 一 0 表示 超过 了 肾 数 估 值 或 迭代 的 最 
大 数字 ; exitflag -二 0 表示 明 数 不 收敛 于 解 x; lambda 一 lower 表示 下 界 Ib,1lambda 一 
upper 表示 上 界 ub,lambda 王 ineqlin 表示 不 等 式 约 束 ,lambda 一 eglin 表示 等 式 约 束 ， 
lambda 中 的 非 0 元 素 表 示 对 应 的 约束 是 有 效 约 束 ; output 王 iterations 表示 迭代 次 数 ， 
output 一 algorithm 表示 使 用 的 运算 规则 ,output 一 cgiterations 表示 PCG 进 代 次 数 ，。 
【 例 10-1】 下 面 的 优化 问题 : (一 25zrl 一 40zrz 一 61zrs)mn。 甚 中 
1 一 二 20 
| 上 rz 十 4zs 所 42 
加 -2x 过 30 
[1 9 全 2 st3 0 


编写 MATLAB 程序 如 下 : 


Clec,clear,close all 

EF= 29 > = 人 LI: 

N=[1=1 13 2 #4;3 2 0|: 

b = [20; 42; 30]; 

lb = zeros(3,1); 

[x, fval, exitflag,output, lambdal| = linprog(lf,A,b,[ 1,[|,1b) 
lambda. ineqlin 

lambda. lower 


运行 程序 ,输出 结 来 如 下 : 


Optimization terminated 
ww 二 
0.0000 
15.0000 
3.0000 
fval = 
一 783.0000 
exitflag = 
1 


1 

| 

1 

| 
| "i 
UU 
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CUPuL 三 
iterations: 6 
algorithm: 'interior 一 point' 
cgiterations: 0 
message: 'Optimization terminated.' 
constrviolation: 0 
firstorderopt: 5.9236e 一 09 


lJambda = 
ineqlin: [3xl] doublel 
eqlin: [0xl1 doublel 
upper: [3xl1 doublel| 
lower: [3xl1 doublel 


0.0000 
13.2500 
4.7500 


35.0000 
0.0000 


0.0000 
Ee 


结果 表明 : 不 等 约束 条 件 2 和 3 以 及 第 1 个 下 界 是 有 效 的 。 
10.2 非 线 性 规划 问题 
非 线 性 规划 是 具有 非 线 性 约束 条 件 或 目标 函数 的 数学 规划 ,是 运筹 学 的 一 个 重要 分 


支 。 非 线性 规划 研究 一 个 元 实 函 数 在 一 组 等 式 或 不 等 式 的 约束 条 件 下 的 极 值 问 题 , 且 
目标 函数 和 约束 条 件 至 少 有 一 个 是 未 知 量 的 非 线 性 函数 。 目 标 函数 和 约 东 条 件 都 是 线 


性 商 数 的 情形 则 属于 线性 规划 ，。 


10.2.1 有 约束 的 一 无 函数 最 小 值 


在 MATLAB 中 使 用 fminbnd() 本 数 求 单 变量 函数 最 小 值 。 通 过 MATLAB 中 的 帮 
助 文档 ,可 以 知道 函数 的 功能 。 


>> help fminbnd 
fminbnd Single — variable bounded nonl inear function minimization. 
X = fminbnd(FUN,x]1,x2) attempts to find a local minimizer X of the function 
FUN im the interval xl <X< x2. FUN is a function handle. FUN accepts 
scalar input X and returns a scalar function value F evaluated at X. 


格式 如 下 : 
(1) xx 一 {fminbndCftuny,xl,x2)。 返 回 目 变量 工 在 区 间 并 ; 一 zz， 上 上 因数 fun 取 最 小 


值 时 工 值 ,fun 为 目标 晒 数 的 表达 式 字 符 串 或 MATLAB 目 定 义 盟 数 的 晒 数 柄 。 

(2) x 二 fminbnd(fun,xl,x2,0ptions)。options 为 指定 优化 参数 选项 。 

《3) Lx*fvalj 一 fminbnd(…)。fval 为 目标 因数 的 最 小 值 。 

(4) [x,fval,exitflag | 三 fminbnd(… )。exitflag 为 终止 过 代 的 条 件 。 

(5) | xfval,exitflag,output | 一 fminbnd(…-)。output 为 优化 信息 。 

说 明 : 参数 exitflag 一 0 表示 图 数 收 仇 于 zexitflag 王 0 表示 超过 哺 数 估计 值 或 沈 代 
的 最 大 数字 ,exitflag 一 0 表示 图 数 不 收 伍 于 x; 参数 output 王 iterations 表示 进 代 次 数 ， 
output 二 funccount 表示 好 数 赋值 次 数 ,output 二 algorithm 表示 所 使 用 的 算法 。 

【 例 10-23 计算 下 面 图 数 在 区 间 (C0.1) 内 的 最 小 值 : 


| 和 


编写 MATLAB 程序 如 下 : 


>> [x, fval, exitflag, output] = fminbnd('(x*3+ cos(x) + xx log(x))/exp(x)',0,1) 
区 二 
0. 5223 
fval = 
0.3974 
exitflag = 
1 
output = 
iterations: 9 
funcCount: 9 
algorithm: 'golden section search, parabolic interpolation' 


【 例 10-3】 在 L0.,5] 上 求 下 面 函 数 的 最 小 值 : 
f(r) = (rr—3)—1, 工区 0),5| 
先 目 定义 函数 ,在 MATLAB 编辑 需 中 建立 M 文件 如 下 : 


function f = myfunl(x) 
T= Mx 3 2 = 1: 


保存 为 myfun. m, 然 后 在 命令 窗口 中 输入 命令 如 下 : 


>> X= fminbnd((@myfun,o0,5) 


运行 程序 ,输出 结果 如 下 : 


10.2.2 无 约束 的 多 元 函数 最 小 值 


MATLAB 中 利用 函数 fminsearch() 求 无 约束 多 元 函数 最 小 值 . 通过 MATLAB 中 


= 上 


二 


) 


-村 为 (党 
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的 帮助 文档 ,可 以 知道 图 数 的 功能 。 


>> help fminsearch 
fminsearch Multidimensional unconstrained nonlinear minimization (Nelder — Mead) 
xX = fminsearch(FUN,X0) starts at X0 and attempts to finda local minimizer 
X of the function FUN. FUN is a function handle. FUN accepts input Xx and 
returns a scalar function value F evaluated at XX. X00 can be a scalar, vector 


Or matrix. 


格式 如 下 : 
(1) x 一 fminsearch(fun,x0)。zxo 为 初始 点 :fun 为 目标 因数 的 表达 陈 字 符 串 或 
MATLAB 上 月 定义 图 数 的 因数 柄 。 
(2) | x,fval] 二 fminsearch(…)。 最 优点 的 图 数值 。 
(3) | xfval,exitflag | 一 fminsearch(…)。 exitflag 与 单 变 量 情 形 一 致 。 
(4) | xfval,exitflag,output | 一 fminsearch(… )。output 与 单 变 量 情 形 一 致 。 
注意 : fminsearch() 采 用 了 Nelder-Mead 型 简单 搜寻 法 。 
【 例 10-4】 求 下 列 晤 数 的 最 小 值 点 : 
= 2 | 村 一 【0 区 5 证 


编写 MATLAB 程序 如 下 : 
>>X= fminsearch('2x%x(1)*3+4x*x(1) x x(2)*3—10xx(1) x* x(2) +x(2)*2', [0,0]) 
运行 程序 ,结果 如 下 : 


二 
1.0016 0.8335 


或 在 MATLAB 编辑 带 中 建立 也 数 文件 : 


function f= myfun(x) 
f=2% XLl1})"*3+ A x(1) x x(2}*3— 10% x(1) x x(2})} + x(2)"2; 


保存 为 myfun. mo, 在 命令 窗口 中 输入 命令 如 下 : 
>> X= fminsearch ('myfun', [0,0]) 

>> X= fminsearch(@myfun, [0,0]) 

运行 程序 ,结果 如 下 : 


= 
1.0016 0.8335 


利用 顶 数 fminunc(C) 求 多 变量 无 约束 困 数 最 小 值 。 通 过 MATLAB 中 的 帮助 文档 ， 
可 以 天 道明 效 的 功能 。 


>> help fminunc 
fminunc finds a local minimum of a function of several variables. 
X = fminunc(FUN,X0) starts at XO and attempts to find a local minimizer 
* of the function FUN. FUN accepts Input X and returns a scalar 


function Value F evaluated at X. XO0 can be a scalar, vector or matrix 


格式 如 下 : 

(1) x 二 fminuncCfun,x0)。 返 回 给 定 初 始点 ze 的 最 小 函数 值 点 。 

(2) x 二 {minunc(fun,x0,options)。options 为 指定 优化 参数 。 

(3) [x,fval] 一 fminunc(…)。fval 为 最 优点 工 处 的 函数 值 。 

(4) [x,fval,exitflag | 二 fminunc(…)。exitflag 为 终止 选 代 的 条 件 。 

(5) | xfval,exitflag,output | 一 fminunc(…)。output 为 输出 优化 信息 。 

(6) | xfval,exitflag,outputy grad | 一 fminunc(…)。grad 为 图 数 在 解 工 处 的 梯 
度 值 。 

(7) [x,fval, exitflag, output, sgrad ,hessian | 一 {minunc(*…), Hessian 为 目标 图 数 
在 解 x 人 钼 的 海 冠 (Hessian) 值 ，. 

注意 : 当 函 数 的 阶 数 大 于 2 时 ,使 用 fminunc 比 fminsearch 更 有 效 , 但 当 所 选 浮 数 高 
度 不 连续 时 ,使 用 fminsearch 效果 较 好 。 

【 例 10-5〗】 求 下 列 函 数 的 最 小 值 : 

f(x) = 3xi + 2xrizxe 十 工 : 
编写 MATLAB 程序 如 下 : 
>> fun = '3¥x(1)*2+2xx(1) x x(2) + x(2)*2'; 


>> XD0=|[111:;: 


>> [x, fval, exitflag, output, grad, hessian| = fminunc( fun, x0) 


运行 程 订 ,输出 结 末 如 下 : 


x 一 
1].0e— 008 * 
—0.7591 0.2665 
fval = 


1.3953e— 016 
eXxitflag = 
1 
Output = 
iterations: 3 
funcCount: 16 
stepsize: 1.2353 
firstorderopt: 1.6772e— 007 


algorithm: 'medium— scale: Quasi— Newton line search' 


CA 
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grad = 
1.0e 一 006 * 
— 0.1677 
0.0114 
hessian = 
6.0000 2.0000 
2.0000 2.0000 


或 用 下 面 方法 : 


>> fun = inline('3x% x(1})*2+2 x x(1) %* x(2) + x(2)*2') 
fun = 

Inline function: 

fun(x) = 3x%* x(1)*2+2x x(1) * x(2) + x(2)"*2 
>> x0=|[111]:; 
>> X= fminunct( fun, xO0) 
区 二 

1 .已 一 DO8B 其 
— 00.7591 0.2665 


10.2.3 有 约束 的 多 元 函数 最 小 值 


MATLAB 提供 了 求解 非 线 性 有 约束 的 多 元 肾 数 的 最 小 值 明 数 fmincon()。 通 过 
MATLAB 中 的 帮助 文档 ,可 以 知道 困 数 的 功能 。 


>> help fmincon 
fmincon finds a constrained minimum of a function of several variables. 
fmincon attempts to solve problems of the form: 
min F(X) subject to: AxX < 二 = B, Aeqg*x X = Beqg (linear constraints) 
区 C(X)} <= 0, Ceq(X) = 0 (nonlinear constraints) 
LB<= 其 二 = UB (bounds) 


格式 如 下 ， 
(1) x = fmincon(fun,x0,A,b) 


(2) x = fmincon({un,x0,A,b,Aeq.,beqg) 


(3) x 一 fminconCtuny,x0 ,Ab,Aeq:beq,lb:,ub) 


(4) x = fmincon(f{un,x0,A,b,Aeqg,beg,lb,ub,nonlcon) 


(5) xx 一 fminconCfuny,x0,A,b,Aeq,beq,lb,ub,nonlcon,options) 
(6) | xfval | = fminconfK…- ) 

(7) | xfval,exitflag | = fmincon(…) 

(8) | x,fval,exitflag,output | = fmincon(… ) 

(9) [x,fval,exitflag,output,lambda| = fmincon(… ) 

(10) [x,fval,exitflag,output,lambda,grad | = fmincon(… ) 


(11) | xfval,exitflag,output,lambda,grad,hessian | = fmincon(… ) 


说 明 : fun 为 目标 晒 数 , 它 可 用 前 面 的 方法 定义 ; zo 为 初始 全; A、b 满足 线性 不 等 式 
约束 A，Xx 三 b, 和 没有 不 等 式 约 束 , 则 取 A 二 | ,5b 一 [| ];， Aeq、beq 满足 等 式 约束 Aeq 。 
x 二 beq, 若 没有 , 则 取 Aeq 二 LL],beq 二 []; lb,ub 满足 Ib 夺 x 夺 ub, 若 没有 界 , 可 设 lb 二 |]， 
ub 一 []; nonlcon 的 作用 是 通过 接受 的 向 量 x 来 计算 非 线 性 不 等 约束 C(x) 三 0 和 等 式 约 
束 Ceq(x) 二 0 分别 在 x 处 的 估计 C 和 Ceq ,通过 指定 困 数 柄 来 使 用 ,如 二 二 z 一 fmincon 
(myfun, x0,A,b,Aeq,beq, lb,ub, @@ mycon), 先 建立 非 线 性 约束 了 肾 数 ,并 保存 为 
mycon. m: function [C,Ceg|] 一 mycon(x)。 C 二 … 计 算 x 人 处 的 非 线 性 不 等 约束 C(x) 三 
0 的 函数 值 ; Ceq 二 … 计 算 x 处 的 非 线 性 等 式 约束 Ceq(x) 王 0 的 图 数值 ; lambda 是 拉 格 
明日 乘 子 , 它 体 现 哪 一 个 约束 有 效 ; output 为 输出 优化 信息 ; grad 表示 目标 也 数 在 x 人 处 
的 梯度 ; hessian 表示 目标 图 数 在 x 处 的 Hessian 值 。 

【 例 10-6]】 求 下 面 问题 在 初始 点 (0,1) 人 处 的 最 优 解 


” 2 
(x | E212 — Da i 


其 中 
| (zi 一 1) 十 zz 三 0 
I 
约束 条 件 的 标准 形式 为 
[vm -= 1 7 ~ a < 0 
二 ari 一 as 
先 在 MATLAB 编辑 器 中 建立 非 线 性 约束 上 因数 文件 : 
function [ce, ceq|] = mycon (x) 


= x(tli}) Co—1)*2-= x(2)- 
eeEq = 第 无 等 式 约 来 


然后 ,在 命令 窗口 输入 如 下 命令 或 建立 M 文件 : 


>> fun= x(1})*2+x(2)” 2— x(1)} x x(2}— 2x¥x(1}—5 x x(2)'; 先 目 标 函 数 
>>x0=[01|]; 

n=] -2 3); 针线 性 不 等 式 芍 束 
>>b=6; 

>> Meq = [ ]; 第 无 线性 等 式 约 束 
>>beq=[ |]; 

>1b=[ ]; %x 没 有 下 、 上 界 
>>ub=[ ]; 


>>[x, fval, exitflag, output, lambda, grad, hessian] 
= fmincon(fun, x0,B,b,Aeq, beq, 1b,ub, (Vmycon) 


x 一 

3 4 
fval = 
= 
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exitflag = 当 解 收 黎 
1 
Output = 
iterations: 2 
funcCount: 9 
stepsize: 1 
algorithm: 'medium— scale: SQF, Quasi— Newton, line — search' 
firstorderopt: [ |] 
cgiterations: [ | 


lambda = 
lower: [2xl1 double] 秆 xX 下 界 有 效 情况 ,通过 lambda.lower 可 查看 
upper: [2xl double] 竺 和 上 界 有 效 情 况 , 为 0 表示 约束 无 效 
eqlin: [0xl double] 当 线性 等 式 约 东 有 效 情况 ,不 为 0 表示 约 东 有 效 
eqnonlin: [0xl double] 名 非 线 性 等 式 约 来 有 效 情况 
ineqlin: 2.5081le— 008 针线 性 不 等 去 约束 有 效 情况 
ineqnonlin: 6.1938e— 008 各 非 线性 不 等 式 芍 束 有 效 情况 
grad = 竺 目标 函数 在 最 小 值 点 的 梯度 
1.0e 一 006 * 
— 0.1776 
0 
hessian = 秆 目标 号 数 在 最 小 值 点 的 Hessian 值 
1.0000 -0.0000 
-0.0000 1.0000 


【 例 10-7】 求 下 面 问题 在 初始 点 zx= (10, 10, 10) 处 的 最 优 解 。 
(— 奖 ] 并 7》 
其 中 
0 过 zi 十 2xz 十 2xs 所 72 
约束 条 件 的 标准 形式 为 


yi je 一 2 Ta 站 2T3 () 


Ee 二 La 二 LT 2 
编程 如 下 : 


Em x(l) ral2) a 's 
>> x0 = [10,10,10]; 

>>A=[=-=1 -2 -2;122]; 
>>b=|[0;72]; 

>> [x,fvall] = fmincon(fun, x0,A,b) 


运行 程序 ,结果 如 下 : 


有 es 
24.0000 12.0000 12.0000 
fval = 
一 3456 


10.2.4 二 次 规划 问题 


MATLAB R2016a 版 中 的 荫 数 quadprog() 用 来 解 将 二 次 规划 问题 (quadratic 
programming), 且 已 经 取代 了 低 版 本 MATLAB qpG) 晒 数 。 通过 MATLAB 中 的 帮助 文 
档 , 可 以 知道 消 数 的 功能 。 


> help guadprog 
quadprog Quadratic programming. 
xX = quadprog(H,f,A,b) attempts to solve the quadratic programming 
problenm: 
min 0O.S5xx' Hxx+ti+ fi'xx subject to: Axx<= 二 


格式 如 下 : 

(1) x 二 guadprog( 了 HH,f,A.b)。H、.A、f.b 为 标准 形 中 的 参数,x 为 目标 曙 数 的 最 
小 值 。 

(2) x 二 quadprog(H.,f,A,b,Aeq,beg)。Aeq.,beq 满足 等 约束 和 条件 Aeq ， x 一 beq， 

(3) quadprog(H,f{,A,b,Aeq,beg,lb,ub), lb\.ub 分 别 为 解 x 的 下 界 与 上 界 。 

(4) x 二 quadprog(H.,f,A.,b,Aeg,beqg,lb,ub,x0)。xo 为 设置 的 初 值 。 

(5) x 二 quadprog(H.,f,AA,b,Aeq.,beg.,lb,ub,x0,options)。 options 为 指定 的 优化 
参数 。 

(6) | xfval | 一 quadprog(-… )。fval 为 目标 因数 最 优 全 。 

(7) [x,fval,exitflag | 一 quadprog(… ) 。exitflag 与 线性 规划 中 和 参数 意义 相同 。 

(8) | x,fval, exitflag, output | 一 quadprog (…) 。 output 与 线性 规划 中 天数 意义 
相同 。 

(9) [x,fval,exitflag,output,lambda | 二 quadprog(…)。lambda 与 线性 规划 中 参数 
意义 相同 。 

【 例 10-8】 求解 下 面 二 次 规划 问题 


加 


人 | 2 2 0 ) i 


其 中 

[X11 二 Xz 志 22 

— i 
| 


er | > a > {0 
py 1  ， 网 有 1 ,一 工 -> -一 此 本 .证 ] 
由 /1(r)—= sxHx | x: 由 五 一 ,二 sO 百 


i -一 心 To 
由 MATLAB 中 编程 如 下 : 


>>H a 2 
-= =| 2 60); 


CA 


= 上: 


es 
一 一 
和 和 市 


寸 闲 党 


pr 


= 


用 让 Bs 


) 


As 
J 
一 一 


攻 


”了 
于 
中 


1 


-站 1 
+ C0,0) | 
a 


-十 1 
< 二 三 


| 


0 
‘—11 


《 工 1z ( 


求 二 次 规划 的 最 优 解 : (zizz 十 3)mn, 其 中 十 zz 一 2。 
人 
2 


六 

由 

人 

江 

家 站 
8 状 
a 
he | “wm 圭 
- 1l|. 1 | 
J cq 人 na 的 
-RR 4 
和 中 和 
芒 呈 从 
] 划 人 机 
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有 三 之; 
[x, fval, exitflag, output, lambda| = quadprog(H,f,|[ |],|[ |],Aeq,b) 


一 a 方 
运行 程 订 ,输出 结果 如 下 : 程 
引 | 
> In quadprog at 412 求 
Optimization terminated: local minimum found; the solution is singular 解 
0 
1.0000 
1.0000 
fval = 
一 1.0000 
exitflag = 
4 
Output = 
algorithm: 'trust— region— reflective'’ 
iterations: 1 
constrviolation: 2.2204e—-16 
firstorderopt: 0 
cgiterations: 1 
message: [lx7l1 char | 
lambda = 
ineqlin: [0xl doublel 
lower: [2x1 double | 
upper: [2xzl doublej 
eqlin: 1.0000 
大 -a | : _ — se [==| 
10.3 “ 半 无 限 有 约束 的 多 元 函数 最 优 解 
MATLAB 提供 了 函数 fseminf() 来 求解 “ 半 无 限 * 有 约束 多 元 函数 最 优 解 问题 。 通 
过 MATLAB 中 的 帮助 文档 ,可 以 知道 限 数 的 功能 。 
>> help fseminf 
fseminf solves semi— infinite constrained optimization problems 
fseminf attempts to solve problems of 七 he form: 
min { F(x) | C(x) <= 0 , Ceg(x) = 0 , PHI(x,w) <= 0 
六 
for all w in an interval 
(1) x = fsemint(fun.xO0.ntheta., semintcon) 
(2) x = fsemint(f{un,xO,.ntheta, semintcon,A.,b) 
(3) x = {semin{({un,xO.ntheta,seminfcon,A.,b,.,Aeqg.,beqg) 
(4) x = tsemin{(fun,xO0,.ntheta,semintcon,A,b,.,Aeq,beqg.,lb,ub) 
(5) x = fsemint(f{un,.x0,ntheta,semintcon, A,b.,Aeq:beq:lb,ub,.,options) 
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(6) | xyfval | = fseminf(…) 

(7) | xyfval,exitflag | = fseminf(…) 

(8) | x,fval,exitflag,output | 一 fseminf(… ) 

(9) | xyfval,exitflag,outputy,lambda | = fseminf(…) 

其 中 ,ze 为 初始 估计 值 ; fun 为 目标 函数 ,其 定义 方式 与 前 面相 同 ; A.b 由 线性 不 等 
式 约束 A 。 x<b 确定 ,车 没有 , 则 4 二 [ ],b 二 [ ]; Aeq、beq 由 线性 等 式 约束 Aeq * x 二 
beq 确定 ,车 没有 ,; 则 Aeq 王 [L ],beq 王 [L ]; lb.ub 由 变量 x 的 范围 lb 三 x 三 ub 确定 :; 
options 为 优化 参数 ; ntheta 为 半 无 限 约束 的 个 数 ; seminfcon 用 来 确定 非 线 性 约束 向 量 
C 和 Ceq 以 及 半 无 限 约 束 的 向 量 Ki,K;:,…,K,, 通 过 指定 也 数 本来 使 用 ,如 x 一 fseminf 
((@myfun,x0,.ntheta,(@myinfcon), 先 建立 非 线 性 约束 和 半 无 限 约 东 归 数 文件 ,并 保存 


为 mvyinfcon. m: 


function [CCeq Kl,RK2, .1.. ,Kntheta,S] = myinfcon(x, S) 
竺 S 为 向 量 Ww 的 采样 值 

和 初始 化 样本 间距 

if isnan(S(1,1))}), 


S = .. 和 S 有 ntheta 行 2 列 
end 
be 和 计算 样本 和 集 
W2 = … 各 计算 样本 集 
wntheta = . 先 计 算 样本 集 
BL = 名 在 x 和 w 处 的 第 1 个 半 无 限 约束 值 
re 和 在 x 和 ww 处 的 第 2 个 半 无 限 约 束 值 
ri 多 在 和 w 处 的 第 ntheta 个 半 无 限 约 束 值 
C = … 竺 在 六 处 计算 非 线性 不 等 式 约 束 值 
Ceg = ~ 千 在 区 处 计算 非 线 性 等 式 约 束 值 


如 有 果 没 有 约束 , 则 相应 的 值 取 为 | ,如 Ceq 一 | |]; 
fval 为 在 zx 人 处 的 目标 函数 最 小 值 ; exitflag 为 终止 迭代 的 条 件 ; output 为 输出 的 优 
化 信息 ; lambda 为 解 x 的 拉 格 朗 日 乘 子 ， 
【 例 10-10】 求 下 面 一 维 情形 的 最 优化 问题 
fx) 一 《一 0.5) 十 (rz 一 0.5) + (zs — 0.5)° 
其 中 


加 
1000 


人 


下 . | 
R(xrmn) = Sin(vw Ti cos(rw Ts) 《ro — 50)7 — sin(tw1 zx3) — Xs 


| Kort ) 一 SInCrozz)cosKrzozl) (roz 一 50) ”一 sinfrozzs) — Xs 所 1 


加 
1000 

1 < wi 过 100 

(1 ws 100 


将 约束 方程 化 为 标准 形 陈 


氏 2z(CTyroz) 一 SIinCzOzT2)COSCTO21D) — ow — 50)" — sin(wrs) — x3—1<0 
Kai(zyzau) 一 sin(zautzi)cos(zutza) — pos Cn — 50)° — sin(wrs) — zs—1<0 


和 危 建立 非 线性 约束 和 半 无 限 约 束 力 数 文件 ,并 保存 为 mycon. mi: 


function [C,Ceq,KRKl,K2,S] = mycon(X,S) 
第 初始 化 样本 间距 
if isnan(S{(1,1)), 
ss= [0.2 0;0.2 0]， 
end 
和 产生 样本 集 
wl = 1:S(1,1}:100; 
w2 = 1:S(2,1):100; 
和 计算 半 无 限 约 束 
Kl = sin(wl ¥ X(1)). x cos(wl x X(2}) 一 1/1000 % (wl — 50}.*2 — sin(wl x X(3)) — X(3}—1:; 
K2 = sin(w2 % X(2)). x cos(w2 x X(1}) 一 i/i000 x% (w2 — 50}).*2 — sin(w2 x* X(3)) — X(3}—1; 
和 无 非 线 性 约束 
C= [| J]; Ceq=| ]; 
和 绘制 半 无 限 约 来 图 形 


plot(wl,Kl,'— ',w2,K2,':'),title('Semi— infinite constraints') 


然后 在 MATLAB 命令 窗口 或 编辑 器 中 建立 M 文件 ， 


fun = 'sum((x— 0.5).*2)'; 
0 2 ls 第 初 值 
[x, Eval] = fseminf (fun,x0,2,(%mycon) 


运行 程序 ,输出 结果 如 下 : 


0.6673 
0. 3013 
0. 4023 
fval = 
0.0770 
>>[C, Ceq, Kl,K2] = mycon (x, NaN); 当 利用 初始 样本 间距 
>> max(Kl) 
ans = 
一 0.0017 
>> max( K2) 
ans = 
一 0.0845 


绘制 半 无 限 约 束 图 形 如 图 10-1 所 示 。 
【 例 10-11】 求 下 面 二 维 情形 的 最 优化 问题 : 

fxr) 一 (zl 一 0.2)2 十 (rs 一 0.2)2 十 (zs 一 0.2)3 
其 中 
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图 10-1 半 无 限 约 束 图 形 


| Ki(zx,tw) = sin(twixi)cos(tw rs) (Ti 一 50) CO— sin(twirs) 一 并 十 …- 


CE 
1000 
J sin( Toe Tz ) COS(TIT1) 一 (twz 一 50) CO— sin(wzs Xx3)— X31.5 


本 本 
1000 


1 二 过 100 

(1 < 二 rs 过 100 

初始 点 为 如 一 [0.25，0.25，0. 25]。 
先 建立 非 线 性 和 半 无 限 约 束 卫 数 文 件 : 


function [C,Ceg,Kil,S] = myvysw(X,s) 
第 初始 化 样本 间距: 
if isnan(s(1,1)), 
s = [22]; 
end 
入 设置 样本 集 
wlx = 1l1:s(1,1):100; 
wly 1:s(1L ,2):100: 
[wx, wy|] = meshgrid(wlx,wly); 
和 当 计 算 半 无 限 约 束 函 数值 
Kl = sin(wx x X(1)). x cos(wx * KX(2)) — 1/1000 x (wx — 50).*2 — sin(wx* X(3)) — X(3) + sin(wy 
x KX(2)). x cos(wzx * X(1))— 1/1000*# (wy 一 50).^2 — sin(wy * X(3)) — X(3)— 1.5; 
和 无 非 线 性 约束 
C= Ge 
名作 约束 曲面 图 形 
m = surf(wx,wy,Kl,'edgecolor', 'none', 'facecolor', 'interp'); 
camlight headlight 


title('Semi— infinite constraint') 


drawnow 


然后 在 MATLAB 命令 窗口 中 输入 命令 : 


clc,clear, close all 

fun = sum((x— 0.2).2)'; 

x = [0.25, 0.25, 0Q. 251: 

[x, Eval] = fseminf (fun,x0,1,(Wmyysw) 


运行 程序 ,输出 结果 如 下 ， 


Local minimum possible. Constraints satisfied. 

fseminf stopped because the predicted change in the objective function 
is less than the default value of the function tolerance and constraints 
are satisfied to within the default value of the constraint tolerance 


< stopping criteria details > 
x = 
Be 0.1714 0.1936 
fval = 
0.0036 
ans = 
— 0.0332 
>>[c,ceq,Kl] = mycon(x, [0.5,0.5]); 竺 样本 间距 为 0.5 
>> max(max(Kl)) 
ans = 
一 0.0332 


得 到 约束 曲面 图 形 如 图 10-2 所 示 。 


图 10-2 半 无 限 三 维 约束 曲面 


10.4 极 小 化 极 大 问题 


MATLAB 提供 了 函数 fminimax() 来 求解 极 小 化 极 大 问题 。 通 过 MATLAB 中 的 帮 
助 文档 ,可 以 知道 函数 的 功能 。 


-- 壤 洁 ( 尘 ) 淮 了 半 读 小 二 党 目 容 
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>> help fminimax 
fminimax finds a minimax solution of a function of several variables 
fminimax attempts to solve the following problenm: 
min (max {FUN(X} ) where FUN and X can be vectors or matrices 
区 


格式 如 下 : 

(1) x = fminimax(fun, x0) 

(2) x = fminimax(fun,xO0,A.,b) 

(3) x = fminimax(fun,x0,A,b,Aeg,beg) 

(4) x 一 fminmax(fun,x0,A,b,Aeqg,beq,lb,ub) 


(5) x = fminimax(fun, x0,A,b,Aeqg,beqg.lb,ub,nonlcon) 


(6) x 一 fminimax(fun,x0,A,b,Aeg,beg,lb,ub,nonlcon,options) 
(7) | xfval,maxfval | = fminimax(…) 

(8) [x,fval, maxfval,exitftlag | = fminimax(…) 

(9) [x,fval, maxfval,exitflag ,output | = fminimax(***) 

(10) [ x,fval,maxfval,exitflag ,output,lambda | = fminimax(*…) 


说 明 : fun 为 目标 函数 ; ze 为 初始 值 ; A、b 满足 线性 不 等 约束 A，x 三 bp, 若 没有 不 等 


约束 , 则 取 A 二 [ ],b 一 |L ]; Aeq beq 满足 等 式 约束 Aeq， x 二 beq; 若 没有 ,; 则 取 Aeq 二 | ]， 
beq 一 | j」; Ibub 满足 lb 过 x 三 ub,; 夺 没有 界 , 可 设 lb 一 | ,ub 一 | j」; nonlcon 的 作用 是 通 
过 接受 的 向 量 x 来 计算 非 线 性 不 等 约束 C(x) 夺 0 和 等 式 约 束 Ceq(x) 二 0 分别 在 x 处 的 
值 C 和 Ceq, 通 过 指定 随 数 林 来 使 用 ,如 二 二 x 三 fminimax((@myfun,x0,A.,b,Aegq,beq， 
lb,ub,(@mycon), 先 建立 非 线 性 约束 隐 数 ,并 保存 为 mycon. m: 


function [C,Ceq] = mycon(x) 


C = … 各 计算 x 处 的 非 线 性 不 等 约束 C(x) 反 0 的 函数 值 
Ee 和 计算 x 处 的 非 线 性 等 式 约 束 Ceq(x) =0 的 函数 值 


options 为 指定 的 优化 参数 ; fval 为 最 优点 处 的 目标 函数 值 ; maxfval 为 目标 子 数 在 


xz 处 的 最 大 值 ; exitflag 为 终止 沈 代 的 条 件 ; lambda 是 拉 格 明日 乘 子 , 它 体 现 哪 一 个 约束 
有 效 ; output 为 输出 优化 信息 。 


【 例 10-12】 求 下 列 函 数 最 大 值 的 最 小 化 问题 : 
[Cs Cr Tata rs Ts (| 
其 中 
‘fi (x) 一 2z1 十 2 一 487 — 40xz + 304 
flrx) =— Xi — 3x2 
f(x) = 并 十 3zs 一 18 
i 
(fs x) = 工 I 十 工 z。 一 六 
先 建立 目标 果 数 文件 : 


functionf = myfunl(x) 

£f{(1)= 2% x(1)*2+ x(2})”2— 468 ¥ x(1) -40 x x(2) + 304; 
下 (2 = —xIl1})’”2 — 3 (2)"2; 

£f(3) = x{(1} + 3x x(2) -18; 

f(a4)= —x(1)— x(2); 

£f(5) = x(1} + x(2) 一 日; 


然后 ,在 命令 窗口 中 输入 命令 : 


x) = 0.17 0.1]; 秆 初始 值 
[x, fval|] = fminimax( (@mvyfun,xO0) 


运行 程 订 ,输出 结 来 如 下 : 


4.0000 
4.0000 
fval = 
0.0000 一 64.0000 一 了 .0000 一 8.0000 一 0.0000 


【 例 10-13】 求 上 述 问 题 的 绝对 值 的 最 大 值 最 小 化 问题 。 
目标 晒 数 为 | | fi1 ( 工 ) | . | fs 元》 | ' | fs (TE) | . | fa ( 工 ) | . | fs ( 工 ) | |] 。 
先 建 立 目 标 子 数 文 件 : 


>>x0 = [0.1; 0.1]; 币 初始 点 
>> options = optimset( 'MinAbsMax',S5); 第 指定 冰 对 值 的 最 小 尼 


>>[x,fval] = fminimax((@myfun,x0,[ 1],{[ [LI LI ] options) 


运行 程序 ,输出 结 采 如 下 : 


31.235b =—31.235b 一 .B351 一 了 .0022 — D0.9948 


10.5 多 目标 规划 问题 


多 目标 规划 是 指 在 一 组 约束 下 ,对 多 个 不 同 目 标 限 数 进行 优化 。 它 的 一 般 形 式 为 
[Gr tw fC) EY ls 
gjtT) EO0, 7=1,2,3,…,p 
其 中 
无 一 《TI19Tayeeos 


在 同一 约束 下 , 当 目 标 果 数 处 于 冲突 状态 时 ,不 存在 最 优 解 工 鸽 所 有 目标 师 数 同时 


一 一 一 
让 市 


了 诗 游 


pr 


= 


-~- 插 为 (小 ) 
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达到 最 优 。 此 时 ,使 用 有 效 解 , 即 如 果 不 存在 zES, 使 得 fi(x) 宇 fi(x*) ,i 二 1,2,3,…， 
Mm， 则 称 x ”为 有 效 解 。 

在 MATLAB 中 提供 了 了 因数 fgoalattain() 来 求解 多 目标 问题 。 通 过 MATLAB 中 的 
帮助 文档 ,可 以 知道 也 数 的 功能 。 

>> help fgoalattain 


fgoalattain solves the multi 一 objective goal attainment optimization 


Problem. 


格式 如 下 : 
(1) x = tgoalattain(fun, x0 ,goal,weight) 
(2) x = fgoalattain(fun,x0 ,goal,weight,A.,b) 


(3) x = fgoalattain(fun,x0 ,goal,weight,A.,b,Aeqg,beq) 
(4) x = fgoalattain(fun,x0 ,goal,weight,A,b,Aeqg,beqg,lb,ub) 
(5) x = fgoalattain(fun,x0 .goal,weight, A.,b,Aeqg,beg,lb,ub,nonlcon) 


(6) x = fgoalattain(fun,x0 ,goal,weight, A.,b,Aeq,beqg;lb,ub,nonlcon,options) 
(7) [x,fval| = fgoalattain(… ) 


(8) | xfval,attainfactor | = fgoalattain(…) 


(9) [x,fval,attainfactor, exitflag | = fgoalattain(… ) 

(10) [x,fval,attainfactor,exitflag, output | = fgoalattain(…) 

(11) [x,fval,attainfactor, exitflag,output,lambda | = fgoalattain(… ) 

说 明 : ze 为 初始 解 回 量 ; fun 为 多 目标 果 数 的 文件 名 字符 串 , 其 定义 方式 与 前 面 fun 
的 定义 方式 相同 ; goal 为 用 户 设 计 的 目标 晒 数 值 回 量 ; weight 为 权 值 系数 回 量 ,. 用 于 摊 
制 目 标明 数 与 用 户 目 定义 目标 值 的 接近 程度 ; A、b 满足 线性 不 等 式 约束 A 和 A，x 三 b, 没 有 
时 取 A 一 | ,5b 一 | ];， Aeq beq 满足 线性 等 式 约 束 Aeq* x 二 beq, 没 有 时 取 Aeq 一 [ ]， 
beq 一 | j」; lb.ub 为 变量 的 下 界 和 上 界 ,1b 夺 x 三 ub; nonlcon 的 作用 是 通过 接受 的 同 量 x 
来 计算 非 线 性 不 等 约束 C(x) 夺 0 和 等 式 约 束 Ceq(x) 二 0 分别 在 x 处 的 值 C 和 Ceq, 通 过 
指定 上 恩 数 梵 来 合用。 如 二 二 x 一 fgoalattain((® myfun,x0,goal,weight,A,b,Aeg,beg, 
lb，ub ,@mycon) , 先 建 立 非 线性 约束 图 数 , 并 保存 为 mycon. m: 


function [GC,Ceg|] = mycon(x) 


BS 和 计算 x 处 的 非 线 性 不 等 式 约 束 C(x) 三 0 的 函数 值 
Ceg = ~ 和 计算 x 处 的 非 线 性 等 式 约 束 Ceq(x) =0 的 函数 值 


options 为 指定 的 优化 参数 ; fval 为 多 目标 归 数 在 x 人 处 的 伸 ; attainfactor 为 解 x 人 处 
的 目标 规划 因子 ; exitflag 为 终止 从 代 的 条 件 ; output 为 输出 的 优化 信息 ;lambda 为 解 
x 仁 的 拉 格 朗 日 乘 子 ，。 

【 例 10-14】 设 如 下 线性 系统 : 


其 中 


— 0.5 全 OQ | ] 
] 0 DO 
A 二 0 — 2 lI0 |, B= |—2z 。 一 | 
OQ 0 1 
局 ] — 2 | 局 


要 求 设计 输出 反馈 控制 邵 天 ,使 财 环 系统 : 

人 ~— (A BRKC)I+ Bu 

Ls 一 Cx 
在 复 平 面 实 轴 上 斥 [ 一 5, 一 3, 一 1 的 左 侧 有 极点 ,并 要 求 一 4 夺 Kijy 志 4 (i,j 二 1,2)。 
上 述 问 题 就 是 要 求解 矩阵 慌 , 使 矩阵 (4 十 BRKC) 的 极点 为 [一 5, 一 3, 一 1], 这 是 一 个 


多 目标 规划 问题 。 


先 建 立 目 标 晒 数 文件 : 


function F = eigfun(K,A,B,cC) 
F = sort(eig(A+Bx Kx C)); 第 估计 目标 加 数值 


然后 ,输入 参数 并 调用 优化 程序 : 


Su 一 cl 2 
B= [10; -22;011: 


C= [100;001]; 

Eo 当初 始 化 控制 器 矩阵 

goal = [-5 -3 一 1]， 多 为 闭合 环 路 的 特征 值 (极点 ) 设 置 目标 值 向 量 
weight = abs(goal) 对 设置 权 值 向 量 

lb = 一 4xones(sizefKO)): 和 设置 控制 器 的 下 界 

ub = 4x ones(size(K0)):; 竺 设置 控制 器 的 上 界 


options = optimset( 'Display', 'iter'); 竺 设置 显示 套数: 显示 每 次 和 民 的 输出 
[K, fval,attainfactor|] = fgoalattain( (® eigfun, KO, goal, weight, [ |],[ |],[ 1,[ |], 1b,ub,l[ |], 
options, A, B,C) 


运行 程序 ,输出 结果 如 下 。 


welight = 
5 3 1 
Attainment Directional 
Iter CF— count factor ”Step 一 size derivative Procedure 

1 6 1.885 1 1.03 
2 13 1.061 1 — 0.679 
3 20 0.211 1 一 心 - 523 Hessian modified 
4 27 一 0.06352 1 一 .0053 Hessian modified twice 
5 34 i el 1 一 愉 .133 
6 41 一 0.3489 1 一 0.00768 Hessian modified 
7 48 一 0.3643 1 — 4.25e— 005 Hessian modified 
8 55 —0.3645 1 一 0.00303 Hessian modified twice 
9 62 一 0.3674 1 — 0.0213 Hessian modified 

10 69 一 0.3806 1 0.00266 

11 76 — 0.3862 1 一 2.73e 一 005 Hessian modified twice 

12 83 一 0.3863 1 — 1.22e— 013 Hessian modified twice 
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Optimization terminated successfully: 
Search direction less than 2 * options. TolX and maximum constraint violation is less 
than options. TolCon 
hctive Constraints: 
1 
2 


— 4.0000 一 0.2564 

一 4.0000 一 4.0000 
fval = 

— 6.9313 

— 4.1588 

一 1.4099 
attainfactor = 

— 0.3863 


10.6 最 小 二 乘 最 优 问题 


最 小 二 乘 理 论 末 用 拟 合 的 方式 ,去 晕 近 目标 限 数 ,达到 最 优 。 最 小 二 和 弱 最 优 问 题 求 
解 曾 述 将 包括 约束 线性 最 小 二 乘 \ 非 线性 曲线 拟 合 、 非 线性 最 小 二 乘 , 非 俩 线性 最 小 二 乘 
等 :利用 最 小 二 乘法 理论 :可 以 向 便 地 求 得 未 各 的 数据 ,并 使 得 这 些 求 得 的 数据 与 实际 数 
据 之 间 误 差 的 平方 和 为 最 小 。 


10.6.1 约束 线性 最 小 一 乘 


MATLAB 提供 函数 lsqlin() 求 解 有 约束 线性 最 小 二 乘 问题 。 通 过 MATLAB 中 的 
帮助 文档 ,可 以 知道 因数 的 功能 。 


>> help lsqlin 
lsqlin Constrained linear least squares. 
XxX = lsgqlin(C,d,B,b) attempts to solve the least— squares problem 
main 0O.5%x (NORM(Cx x— d)).*2 subject to AxxXx<= b 
了 


Where C ism— by—n. 


格式 如 下 : 

(1) x 二 lsqglin(C,d,AA,b)。 求 在 约束 条 件 A，x 三 bp 下 ,方程 Cx 一 4d 的 最 小 二 科 

(2) x 二 lsqlin(C.d,A,b,Aeg,;beg)。Aeq .beq 满足 等 式 约 束 Aeq， x 二 beg, 吞没 有 
不 等 式 约束 , 则 设 A==[ ],b 二 [ ]。 

(3) x 三 ]sglin(C,d,A,b,Aeg,beq,lb,ub)。 1lb.ub 满足 lb 二 xs 二 ub, 和 契 没 有 等 式 约 


束 , 则 Aeq 一 | ,beq 一 L jj。 

(4) x 二 lsqlin(C,d,A,b,Aeq;beq;lb,ub,;x0)。zxo 为 初始 解 向 量 , 若 x 没有 界 , 则 
lb 一 [ j],ub=| j。 

(5) x 二 ]sqlin(C,d,A,b,Aeg,beq,lb,ub,x0,options)。options 为 指定 优化 和 参数。 

(6) [x,resnorm | 一 1sqlin(…)。resnorm 一 normCC x x 一 d)^2, 即 2 范 数 。 

(7) | xy,resnorm residual | 一 1sqlin(… ) 。residual 一 CC xx 一 d, 即 残 差 。 

(8) | x,resnorm residual ,exitflag | 一 lsqlin(… )。exittlag 为 终止 迁 代 的 条 件 。 

(9) | x, resnorm, residual, exitflag, output | 一 lsqlin(… )。output 表示 输出 优化 


信息 。 
(10) | x,resnorm,residual,exitflag,output,lambda | 一 1sqlin(…) 。 lambda 为 解 工 
的 拉 格 明日 乘 子 。 
【 例 10-15】 求 下 面 系统 的 最 小 二 乘 解 : 
(Cx = d) nmin 
其 中 
(A4.:x=b 


lip 二 xX 三 Ub 
先 输入 系统 系数 和 x 的 上 下 界 ,编程 如 下 : 


C= [0.9501 0. T7620 0.6153 0.4057; … 
0Q.2311 0.4564 0.7919 0.9354;. 
0.6068 0.0185 0.9218 0.9169;... 
0.4859 0.8214 D0. 7382z 0.4102;-. 
0.8912 0.4447 0.1762 0.8936]; 

d= [0.0578; 0.3528; 0.8131; 0.0098; 0.1388|]; 

A=|[ 0.2027 0.2721 OQ.7467 0.4659; -.- 
0. 1987 0.1988 0.4450 0.4186; … 
0.6037 0.0152 0.9318 0.8462 |]; 


b =[ 0.5251; 0.2026; 0.6721]; 
ub = 2x ones(4,1); 


然后 调用 最 小 二 乘 命令 : 


[x, Tresnorm, residual, exitflag, output, lambca]l = lsqlin(C,d,A,b,[ ],[ |],i1b,ub): 


运行 程序 :输出 结 采 如 下 : 


Xx 一 

一 0.1000 

一 0.1000 

0.2152 

0. 3502 
IEeESNOIMm = 

0.1672 
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residual = 
0.0455 
0.0764 
— 0.3562 
0.1620 
0.0784 
exitflag = 
1 多 说 明 解 是 收 玄 的 
output = 
iterations: 4 
algorithm: 'medium— scale: active 一 Set" 
firstorderopt: [|] 
cgiterations: [|] 
lambda = 
lower: [4xl double| 
upper: [4xl1 double| 
eqlin: [0xl doublel| 
ineqlin: [3xl doublel 


通过 lambda. ineqlin 可 查看 非 线 性 不 等 式 约 束 是 否 有 效 。 
10.6.2 韭 线 性 曲线 拟 合 


在 MATLAB 中 提供 了 非 曲 线 拟 合 明 数 lsgqcurvefit(C) 来 求解 问题 。 通过 MATLAB 
中 的 帮助 文档 ,可 以 知道 函数 的 功能 。 


>> help lsqcurvefit 
lsqcurvefit solves non— linear least squares problems. 
lsqcurvefit attempts to solve problems of the form: 
min sum {(FUN(X, XDATA) — YDATA).*2} where X, XDATA, YDATA and 七 he 
外 values returned by FUN can be 
vectors or matrices. 


格式 如 下 : 

(1) x = lsgcurveftit(fun, x0,xdata,ydata) 

(2) x = lsgcurvetit(i{un,xO0,xdata,ydata,lb,ub) 

(3) x 一 lsqcurvetit(fun,x0,xdata,ydata,lb,ub,options) 

(4) [x,resnorm | = lsgcurvefit(**) 

(5) | xyresnormyresidual | = lsqcurvefit(…) 

(6) | xyvresnorm ,residual,exitflag | = ljsqcurvefit(…) 

(7) [x,resnorm,residual,exitflag ,output| = lsqcurvefit(… ) 

(8) [x,resnorm ,residual,exitflag ,output,lambda | = lsgcurvefit(…:) 

(9) [x,resnorm,residual,exitflag ,output,lambda,jacobian | 一 1sqcurvefit(…) 

说 明 : zo 为 初始 解 回 量 ; xdata、ydata 为 满足 关系 ydata 二 F(x，xdata) 的 数据 ; lb、 
ub 为 解 器 量 的 下 界 和 上 上 漠 lb 三 x 夺 ub, 硅 没有 指定 界 . 则 1b 一 | ,ub 一 | 」; options 为 指 


定 的 优化 参数 ; fun 为 拟 合 图 数 , 其 定义 方式 为 广 一 lsqcurvefit((@ myfun, x0, xdata， 
ydata) ,其 中 myfun 已 定义 为 function 二 myfun(x,xdata) ,计算 x 人 外 拟 合 蚂 数 值 fun 
的 用 法 与 剖面 相同 ; resnorm 二 sum ((fun(x,xdata) 一 ydata).^2), 即 在 x 人 处 残 差 的 平方 
和 和 ; residual 一 fun(x, xdata) 一 ydata,; 即 在 x 人 处 的 残 差 ; exitflag 为 终止 渴 代 的 条 件 ; 
output 为 输出 的 优化 信息 ; lambda 为 解 荆 处 的 拉 格 明日 乘 子 ; jacobian 为 解 x 人 处 拟 合 昭 
站 fun 的 Jacobian 算 [ 阵 。 

【 例 10-16】 求解 如 下 最 小 二 乘 非 线性 拟 合 问题 

已 知 输入 向 量 xdata 和 输出 向 量 ydata, 且 长 度 都 是 nn, 拟 合 函 数 为 

ydata(i) = zx(1) * xdata(i) ”| xXx(2) *， sin(xdata(2)) | xT(3) ， xdata(i)’ 
即 目 标 消 数 为 


min 一 > CF(x,xdatai) 一 ydatai)“ 


其 中 

F(x,xdata) = 过 1)。xdata -十 过 2)。sin(Cxdata) 二 xX(3) 。 xdata’ 
初始 解 回 量 为 x0 二 [0.3, 0.4, 0.1j]。 
先 建立 拟 合 晴 数 文件 : 


functionF = myfun(x, xdata) 
F = x(1) x xdata.*2 + x(2) * sin(xdata) + x(3) * xdata.*3; 


然后 给 出 数据 xdata 和 ydata: 


~ xdata = [3.6,7.7,9.3,4.1,.8.6,2.8,1.3,7.9,10.0,5.4]; 

> viata = [16.5,150.6,263.1,24.7,208.5,9.9,2.7,163.9,325.0,54.3]; 
>>x0 = [10, 10, 101]; 第 初始 估计 值 

>>[ 和 resnorm| = lsqcurvefit( (®myfun, x0,xdata, ydata) 


运行 程序 ,输出 结果 如 下 : 


Optimization terminated successfully: 
Relative function value changing by less than OPTIONS. TolFun 
x = 
0.2269 0.3385 0.3021 
resnorm = 
6.2950 


10.6.3 非 线 性 最 小 一 乘 


非 线性 最 小 二 乘 ( 非 线性 数据 拟 合 ) 的 标准 形式 为 
min f(x) = fy Cx) fi (CT) 二 二 fm (xX) 二 LL 
式 中 ,为 常数 。 


II 图 
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| 六 下 

、 fz(x) | ES 

设 F(x) 二 | ,|, 则 目标 函数 可 表达 为 
fs 


el 1 


式 中 ,x 为 向 量 ; F(x) 为 函数 向 量 ，。 
在 MATLAB 中 提供 了 非 线 性 最 小 二 乘 函 数 lsqnonlin() 来 求解 问题 。 通 过 
MATLAB 中 的 帮助 文档 ,可 以 知道 图 数 的 功能 。 


>> help lsqnonlin 
lsaqnonlin solves non— linear least squares problems. 
lsqnonlin attempts to solve problems of the form: 
min sum {FUN(X).^2} where X and the values returned by FUN can be 
站 vectors or matrices. 


格式 如 下 : 
(1) x 一 lsqgnonlin(fun,x0)。xo 为 初始 解 回 量 ; fun 为 六 Crz), 一 1,2.…… :7 ,fun 返 
回 向 量 值 ,而 不 是 平方 和 值 ,平方 和 隐 含 在 算法 中 ,fun 的 定义 与 前 面相 同 ， 
(2) x 二 lsqnonlin(fun,x0,lb,ub)。1lb.ub 定 义 xX 的 下 界 和 上 上 界 ,lb 夺 x 夺 ub。 
(3) x 二 lsqgnonlin(fun,x0,lb,ub,options)。options 为 指定 优化 和 倒数 , 耕 x 没有 界 ， 
lb=[ J,ub=[ J 
(4) [x,resnorm | 一 lsgqgnonlinCG…)。resnorm 一 sum(fun(x).“^2), 即 解 x 修 目 标 遇 
数值 。 
(5) | x,resnormresidual | 一 lsqnonlinCG…:)。residual 二 fun(x), 即 和 解 x 人 处 fun 的 值 。 
(6) [x,resnorm,residual,exitflag | 一 ljsqnonlin(… ) 。exitflag 为 终止 进 代 和 条件。 
(7) | xvresnorm residual,exitflag ,output | 一 lsqnonlin(… )。output 为 输出 优化 依 
局 
(8) | x,resnorm residual,exitflag ,output,lambda | 一 lsqnonlin(… )。lambda 为 拉 
格 妆 日 乘 子 。 
(9) | x, resnorm, residual, exitflag, output, lambda, jacobian | = lsqnonlin (… ) 。 
jacobian 为 fun 在 解 工 处 的 Jacobian 和 矩阵。 
【 例 10-173 求 下 面 非 线 性 最 小 二 乘 问题 : 


10 
2 (2 十 28 er — evs)? 
k= 1 


初始 解 向 量 为 xo 一 [0. 3, 0. 和。 
先 建立 函数 文件 ,由 于 lsqnonlin 中 的 fun 为 向 量 形式 而 不 是 平方 和 形式 , 因此 ， 
myfun 函数 应 由 广 Cz) 建 立 : 
frlxr) = 2+2k— el—e”:, k=1,2,3,.",10 
编程 如 下 : 


function F = myfun(x) 
kk = 1:10; 
F = 2++ 2xk— exp(k* x(1)) — exp(k * x(2)); 


然后 调用 优化 程 厅 : 


x = [0.3 0.4]; 


[x, resnorm| = lsqnonlin( (Smyfun,x0) 


运行 程 订 ,输出 结 来 如 下 : 


Optimization terminated successfully: 
Norm of the current step is less than OPTIONS. Tolx 


让 er 
0. 2578 0. 2578 
resnorm = 秆 求 目标 远 数 值 
124.3622 


10.6.4 非 负 线性 最 小 二 乘 


非 负 线 性 最 小 二 乘 的 标准 形式 为 


(slc—ali) x>0 


; ”* TNn 


式 中 ,和 矩阵 C 和 回 量 d 为 目标 困 数 的 系数 ; 向 量 x 为 非 负 独立 变量 。 
在 MATLAB 中 提供 了 非 负 线性 最 小 二 乘 曙 数 lsqnonneg() 来 求解 问题 。 通 过 
MATLAB 中 的 帮助 文档 ,可 以 知道 图 数 的 功能 。 


>> help lsqnonneg 
lsoqnonneg Linear least squares with nonnegativity constraints. 
X = lsqnonmeg(C,d) returns the vector X that minimizes NORM(d— Cx X) 
subject to XX>= 0. Candd mst be real. 


格式 如 下 : 
(1) x = lsgnonneg(C,d) 
(2) x = lsqgnonneg(C,d,x0) 


(3) x 三 lsqgnonneg(C,d,x0 ,options) 

(4) [x,resnorm | = lsgnonneg(……:) 

(5) | xyvresnormyresidual | = 1jsqnonneg(…) 

(6) | x,resnorm residual ,exitflag | = ljsgqnonneg(…) 


(7) | x,resnortm residual ,exitflag ,output | 一 1sqnonneg(-… ) 


(8) | x,resnormvresidual,exitflag ,outputylambda | = ljsqnonneg(… ) 
说 明 : C 为 实 窍 阵 ; d 为 实 回 量 ; xo 为 初始 值 且 大 于 0; options 为 指定 优化 参数 : 


resnorm 一 norm (Cx x—d)^2; residual 二 =C x* x—d, 
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【 例 10-18】 一 个 最 小 二 乘 问题 的 无 约束 与 非 负 约束 解法 的 比较 。 


>>C = [ 0.0372 0.2869; 0.6861 0.7071; 0.6233 0.6245; 0.6344 0.6170]; 
>>d = [0.8587; 0.1781; 0.0747; 0.8405]; 
>> [CO\d, lsqnonneg(C, d)] 
TS 二 
一 2.5627 0 
3.1108 0.6929 


注意 : (1) 当 问 题 为 无 约束 线性 最 小 二 乘 问题 时 ,使 用 MATLAB 下 的 “ ”运算 即 可 
以 解决 。 
(2) 对 于 非 负 最 小 二 来 问题 ,调用 1]sqnonneg(C,d) 求 解 。 


10.7 非 线 性 方程 (组 ) 的 解 


非 线性 方程 ,就 是 因 变量 与 自 变量 之 间 的 关系 不 是 线性 的 关系 ,这 类 方程 很 多 ,如 平 
方 关系 、 对 数 关 系 、 指 数 关 系 、 三 角 函 数 关系 等 。 求解 此 类 方程 往往 很 难得 到 精确 解 ,经 
常 需 要 求 近似 解 问题 。 基 于 MATLAB 优化 工具 箱 , 下 面 着 重 介 绍 如 何 求解 非 线性 方程 
和 非 线性 方程 组 等 。 


: 10.7.1 非 线 性 方程 的 解 


\ 非 线 性 方程 的 标准 形式 为 
f(x =0 
在 MATLAB 中 提供 了 求解 非 线 性 方程 的 函数 fzero()。 通 过 MATLAB 中 的 帮助 
文档 :可 以 开道 图 数 的 功能 。 


> help fzero 
fzero Single— variable nonlinear zero finding. 

X = fzero(FUN,X0) tries to find a zero of the function FUN near X0, 
it XO Is a scalar. It first finds an interval containing X0 where the 
function values of the interval endpoints differ in sign, then searches 
that interval for a zero. FUN is a function handle. FUN accepts real 
scalar input 其 and returns a real scalar function value F, evaluated 
at XxX. The value XX returned by fzero is near a point where FUN changes 
sign (if FUN is continuous), or NaN if the search fails. 


(1) x = fzero (fun,x0) 

(2) x = fzero (fun, x0,options) 
(3) [x,fval| = fzero(*…) 

(C4) [x,fval,exitflag | = fzero(…) 


1 
| 
1 
有 
轩 


(5) [x,fval,exitflag, output | = fzero(…) 

说 明 : 该 归 数 采用 数值 解 求 方程 f(x) 王 0 的 根 。 其 中 ,用 fun 定义 表达 式 f(xX) ,x0 
为 初 怒 解 ,fval 二 f(x)。 

【 例 10-19】 求 关 一 27z 一 5 一 0 的 根 。 

编写 MATLAB 程序 如 下 : 


> fumn= "XxX 2X— 3"; 
>> z= fzero(fun, 2) 向 初始 估计 值 为 了 


运行 程序 ,输出 结 末 如 下 : 


2.0946 


10.7.2 非 线 性 方程 组 的 解 


非 线性 方程 组 的 标准 形式 为 
F(x)=0 
式 中 ,x 为 向 量 ; 下 (xz) 为 函数 向 量 。 
在 MATLAB 中 提供 了 非 曲 线 拟 合 因数 fsolve() 来 求解 问题 。 通 过 MATLAB 中 的 
帮助 文档 ,可 以 知道 随 数 的 功能 。 


>> help fsolve 


fsolve solves systems of nonlinear equations of several variables. 


格式 如 下 : 

(1) x = fsolve(f{un,x0) 

(2) x = fsolve(fun,x0 ,options) 

(3) [x,fval | = fsolve(… ) 

(4) | xfval,exitflag | = fsolve(…) 

(5) | xfval,exitflag,output | = fsolve(…) 

(6) | x,fval,exitflag,output,jacobian | = fsolve(… ) 

说 明 : 用 fun 定义 向 量 函 数 ,其 定义 方式 为 先 定义 方程 函数 function F 一 myfun 
(x)。FF 一 [表达 式 1; 表达 式 2; …; 表达 式 mj,; 保 和 存 为 myfun. m, 并 用 下 面 方式 调用 : 
x 二 fsolve((@myfun.,x0) ,zo 为 初始 佑 计 值 。fval 王 FCx), 即 晒 数 值 回 量 。jacobian 为 解 
x 人 外 的 Jacobian 阵 。 其 余 参 数 与 前 面 参数 相似 。 

【 例 10-20】 求 下 列 系 统 的 根 : 

| 一 ?一 已 ”1 


加 交 ] 十 2 一 人 ? 


化 为 标准 形式 : 
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芭 初 值 点 为 zo 二 [一 5, 一 5j。 
先 建立 方程 消 数 文件 : 
function F = myfunl(x) 


本 
二 


然后 调用 优化 程 厅 : 


x0 = [-5; -5]; 秆 初始 点 
options = optimset!( 'Display', 'iter'); 向 显示 输出 信息 


[x, fval|] = fsolve(l(@myfun, x0,options) 


运行 程序 ,输出 结 采 如 下 : 


Norm of First— order 
Iteration Func— count f(x) step optimality CG— iterations 
1 4 47071.2 1 2.29e+ 004 0 
2 7 6527. 47 1.45207 3.09e + 003 1 
| 10 918.372 1.49186 418 1 
4 13 127.74 1.55326 eT 1 
5 16 14.9153 1.57591 8.26 1 
6 19 0.779051 1.27662 1.14 1 
了 22 0. 00372453 0.484658 0.0683 1 
8 25 9.21617e 一 008 0.0385552 0.000336 1 
9 28 5.66133e 一 017 0.000193707 8.34e 一 009 1 


Optimization terminated successfully: 
Relative function value changing by less than OPTIONS. TolFun 
区 一 
0. 5671 
0.5671 
fval = 
1.0e 一 008 * 
一 心 .59320 
~ 0.5320 


1 2 


3 ,| ,并 设 初始 解 向 量 为 区 二 


【 例 10-21】 求 矩 阵 x 使 其 满足 方程 xXxXx= | 


Elen 
先 编写 M 文件 ， 


functionE = mvyfun(x) 


然后 调用 优化 程序 求解 : 


>>x0 = ones(2,2); 当初 始 解 向 量 
>> options = optimset( 'Display', 'off'):; 秆 不 显示 优化 信息 


>>[x, Fval, exitflag] = fsolve((@myfun,x0,options) 


运行 程序 ,输出 结 采 如 下 : 


下 二 
— 0.1291 0. 8602 
1.2903 1.1612 
Fwal] = 


1l.0e— 003 * 
0.1541 -0.1163 
0.0109 一 0.0243 
exitflag = 
1 


非 线 性 方程 的 求 根 方法 很 多 ,常用 的 有 和 牛顿 迭代 法 、 弦 截 法 等 。MATLAB 提供 了 有 
天 指令 ( 果 数 ) 用 于 非 线性 方程 求 根 。 

对 于 多 项 式 非 线 性 方程 求 根 ,编程 如 下 : 

Cle,clear,close all 


p=[1:4]; 
工 = IrIoots(p) 


行程 序 ,输出 结果 如 下 : 


BY 


下 == 
一 1.6506 + 0.00001 
一 0D.1747 十 1.54691 
一 0.1747 一 1.54691 


对 于 单 变 量 非 线性 方程 求解 问题 ,调用 盯 数 为 : 

z= fzero(l 'fname', x0,tol, trace) 

其 中 ,fname 是 竺 求 根 的 图 数 名 ; zo 为 搜索 的 起 点 ,一 个 因数 可 能 有 多 个 根 , 但 fzero 
图 效 只 给 出 离 ze 最 近 的 那个 根 ; tol 控制 结果 的 相对 精度 ,默认 时 取 tol 二 eps; trace 指 
定 碗 代 信 息 是 否 在 运算 中 显示 trace 二 1]， 显示 ; trace 二 0, 不 显示 ; 只 TI 人 时 .trace 一 0 。 

【 例 10-22】 求 国 数 y 王 0. 23t 一 e 'sint 在 上 一 2 附近 的 委 点 :编程 如 下 : 

编写 图 数 文 件 如 下 : 


function y= v2(t) 
vyV=0.23xt— exp( —t}). x sin(t)}); 


主 四 数 如 下 : 


CA 
[3 人 


MATLAB 科 学 计算 


Clec,clear,close all 
z= fzero('v2',2) 


运行 程序 ,输出 结果 如 下 : 


1 ZLLY 


对 于 一 般 非 线性 方程 组 的 求解 , 则 需要 用 到 较 多 的 是 MATLAB 工具 箱 。 但 由 于 非 
线性 方程 组 是 常用 的 一 类 数学 问题 ,因此 在 此 简单 介绍 。 
【 例 10-23】 对 于 一 般 非 线性 方程 组 FCz) 一 0, 其 数值 解 X 的 求解 指令 如 下 : 


X= fsolvel(l 'fname', XO0) 


求 
rsin(X) 二 yy 十 lnz = 二 7 
3T 十 2y 一 z 十 1 一 0 
的 数值 解 ,编程 如 下 : 


function yl 10 
clc,clear,close all 
x= fsolve((@xvz,[111]1) 对 调用 函数 


end 


外 函数 文件 

function q = XYZL(PD) 

x= p(1); 

Y= p(2); 

z= p(3); 

可 = zeros(3,1); 当初 始 化 
q(1}) = sin(x)} + yy”2+ log(z)— 7; 

2) 二 3 关 下 二 2 一 Zz "3+1; 

站 3) 二 下 十 要 十 世 一 5; 

end 


运行 程序 ,输出 结 采 如 下 : 


D0.6331 2. 3934 1 .9735 


说 明 : 从 原理 上 讲 , 非 线性 方程 组 可 用 符号 工具 包 中 的 solve 和 vpa 指令 求解 数值 
解 ,但 计算 时 间 比 较 长 。 


本 章 小 结 


基于 MATLAB 优化 工具 箱 的 使 用 ,从 MATLAB 工具 箱 出 发 ,列举 了 大 量 的 求解 优 
化 方程 的 因数 ,涉及 线性 规划 . 非 线性 方程 .无 约 东 的 一 元 图 数 最 小 值 求解 .有 约 东 的 多 
元 图 数 最 小 值 求 解 、 二 次 规划 、 极 小 化 极 大 问题 ,多 目标 规划 等 。MATLAB 优化 工具 箱 
提供 了 丰 画 的 琢 数 可 供用 户 调用 :用户 根 据 问 题 育 景 选 用 合适 的 优化 明 数 进行 求解 , 求 


CA 


7 
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一 个 关于 自 变量 .未 知 函数 及 其 导数 的 方 称 称 为 微分 方程 。 只 有 
一 个 自 变 量 的 微分 方程 称 为 常 微 分 方程 。 有 两 个 以 上 自 变量 的 微分 
方程 称 为 偏 微分 方程 。 在 自然 科学 的 许多 领域 中 ,都 会 遇 到 常 微分 方 
程 的 求解 问题 ,只 有 少数 特殊 类 型 的 微分 方程 能 够 求解 精确 解 , 然 而 
大 多 数 情 况 下 ,得 到 其 精确 解 是 很 困难 的 ,或 者 是 不 可 能 的 ,因此 常用 
近似 的 方法 求 得 近似 解 。 本 章 主要 介绍 常 微分 方程 的 求解 问题 。 

学 习 目标 : 

。 学习 和 掌握 常 微 分 方程 组 求解 ， 

。 学 习 和 掌握 欧 拉 方 法 .亚当 斯 方法 以 及 改进 方法 等 ; 

。 熟练 运用 MATLAB 对 一 阶 、 高 阶 微分 方程 组 进行 求解 分 析 等 。 


11.1 单 微分 方程 角 


对 于 用 MATLAB 求 常 微分 方程 (组 ) 的 通 解 ,其 调用 格式 如 下 : 
(1) S=dsolve ('egn', 'var') 
(2) S=dsolve ('egnl', 'egn2',*** ,'egqnm','var') 
对 于 用 MATLAB 求 常 微分 方程 (组 ) 的 特 解 ,其 调用 格式 如 下 : 
(1) S=dsolve ('egn', 'conditionl',***,'conditionn', 'var') 
(2) S= dsolve('eqnl ','eqgn?2',*** ，eqnm '，'conaition1 ' ， 
‘condition2"' ,*** ,'var') 

【 例 11-1〗 计算 微分 方程 zy 十 2y 一 e* 二 0 在 初始 条 件 y|.-1 一 
2e 下 的 特 解 。 


dsolve( 'xx Dy+2x vy— exp(x) =0DOY(L) = 了 Hexp(1I) 'x') 
输出 如 下 : 
ans = (exp(x) * x— exp(x) +2 x exp(1))/x "2 


可 和 特 解 为 


11.2 欧 拉 方法 
欧 拉 方法 包括 向 前 欧 拉 方法 和 向 后 欧 拉 方 法 。 
11.2.1 加 前 欧 拉 方法 


癌 前 欧 拉 方法 义 称 为 显 式 欧 拉 人 公式, 即 通 党 所 请 的 欧 拉 公式 ,用 欧 拉 公式 求解 微分 

方程 的 初 值 问题 就 称 为 欧 拉 方 法 。 回 前 欧 拉 公式 为 
Yrtl 一 Yn hf xansyn), 了 一 0 1 2 

式 中 ,hh 为 步 长 。 

如 果 数 值 方法 的 局 部 截断 误差 为 O(n” ) ,那么 称 这 种 数值 方法 的 阶 数 为 p。 其 中 ， 
户 为 非 全 实数 值 。 通 第 情 况 下 , 步 长 有 越 小 ,Pp 越 高 , 则 局 部 截断 误差 越 小 ,计算 精度 越 
高 。 欧 拉 方 法 的 截断 误差 如 下 : 

(FrHD) — Yat = On’) 

在 MATLAB 中 编程 实现 的 癌 前 欧 拉 方法 求 数 值 解 的 图 数 为 Eulerlil() 。 

功能 : 用 加 前 欧 拉 方法 求 效 值 解 。 

调用 格式 : 


P= Eulerlil (x0, v0,b,h) 


其 中 ,ze 初 值 ; yo 为 初 值 ; 5 为 xo 取 值 区 间 的 右 闹 点 ; 有 为 步 长 。 
编写 加 前 欧 拉 方法 孙 数 文件 如 下 : 


function P= Eulerlil(x0 ,vo,b,h) 


千 xX0 为 初 值 
当 Y0 为 初 值 
当 b 为 x0 取 值 区 间 的 右 端 点 
向 hh 为 步 长 


n= (b— x0)/h; 

KX= zeros(n,1): 

Y= zeros(n,1): 

长 = 工 ; 

X(k) = x0; 

Y(k) = Yo; 

for k=1:n 
xX(k+1) = X(k)+h;: 
Y(k+i+1)= Yk}+ hx (X(kE}) — Y(kE)); 
k=k+i+1; 

end 

v= X—-1+2x% exp( — X); 

plot(X, Y, 'mp', X,y,'b—') 

grid 

xlabel(' 自 变量 X'),， ylabel(' 因 变量 Y') 
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legend('h= 0.075 数值 解 "，' 精 确 解 ')jwY=Y 一 了 Y; 
Xw = jw¥. /v; 

klil=1:n; 

k= [0,k1]; 

P= |[k',X,Y,y,jwY,xwY |]; 


【 例 11-2】 用 欧 拉 方法 求 初 值 问题 : 


| 0 三 工 达 1 
a 


的 数值 解 ,分 别 取 有 二 0.0750,0.0075 ,并 计算 误差 , 男 出 精确 解 和 数值 解 的 图 形 ，。 
根据 该 微分 方程 ,在 MATLAB 工作 窗口 输入 程序 如 下 : 


clc,clear ,close all 
w= 二 0: 和 初 值 


h= 0.0750; 
P= Eulerlil (x0, y0, b, h) 


运行 程 订 ,输出 结 采 如 下 : 


PE = 

0 0 1] .0000 1 .0000 0 0 

1]. 0000 D0.0750 D0.9250 人 .9305 0.0055 0.0059 
2.0000 D0.1500 D0.8613 0.8714 0.0102 0Q.0117 
3.0000 D0. 2250 D0.8079 D0. 8220 0.0141 0Q.0172 
4.0000 D0. 3000 DO. 7642 D0.7816 0.0174 0. 0223 
5.0000 D0.3750 0.7294 D0.7496 0. 0202 0Q.0270 
6.0000 D0.4500 0.7028 0. T1253 0. 0225 0.0310 
7.0000 0. 52350 0.6838 0. 7081 0. 0243 0.0343 
8.0000 0U.6000 D0.6719 0.6976 0. 0257 0.0368 
9.0000 D0.6750 0.6665 D0. 6933 0.0268 0.0386 
10.0000 0.7500 D0.6672 0.6947 0.0276 0.0397 
11.0000 0.8250 0.6734 D0. 7015 0.0281 0.0400 
12.0000 0.9000 0.6847 D0. 7131 0.0284 0.0398 
13.0000 0.9750 0.7009 D0.7294 0.0285 0. 0391 


输出 图 形 如 图 11-1 所 示 。 
当 二 0. 0075 时 ,程序 如 下 : 


clc,clear ,close all 
x0= 0; 当初 值 


h=0.00750; 
P= Eulerlil(x0, v0,b,h) 
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图 11-2 数值 计算 结果 
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图 11-1 


对 照 图 11-1 和 图 11-2 可 和 苔 , 步 长 的 选取 对 于 结 采 精度 有 很 大 影响 。 
Ar 


中 
. 
fr 
二 
中 
民 
= 
由 
目 .i 
| ] 
S cq oS 车 做 = 
- . 电 县 膨 
珀 过 国会 
” 本 
- 这 和 | 
< 3 嘲 物 多 有 2 
二 涩 S JIT 4 ey mF 网 
罗 i . 和 .~ | 
3 下 所 上 国 Se 
J 嵌 匣 一 让 丰 
所 = 本 nN 一 
全 六 一 Vv 
站 "EE Ee Ee 
, | 日 踢 
出 = 
t EU ERsl 232o® 
塌 ud I Na wa 


扯 
过 
淋 
朴 
[ea] 
< 
| 
上 
< 
三 


F 


| CY 


二 


编写 该 初 值 问题 了 清 数 程序 如 下 : 


相应 的 主 程序 如 下 : 


FF = 


=- MATLAB 科 学 计算 


运行 程序 ,输出 图 形 如 图 11-3 所 示 。 


因 变 量 了 


因 变 量 了 


hn=100 数 值 
精确 解 


图 11-3 自 适 应 向 前 欧 拉 求解 


11.2.2 向 后 欧 拉 方法 


回 后 欧 拉 公式 叉 称 为 隐 式 欧 拉 公式 ,四 后 欧 拉 方 法 称 为 隐 式 欧 拉 方 法 。 同 后 欧 拉 公 
陈 为 
yn+l 一 yn 十 屎 三 (zaHyynrH)，， 下 一 0 1 2 
在 MATLAB 中 编程 实现 的 同 后 欧 拉 方 法 求 数 信 解 的 恩 效 为 了 eulerl( ) 。 
功能 : 用 加 后 欧 拉 方 法 求 数 值 解 。 
调用 格式 : 


[X,Y,n,P| = Heulerl (funfcn, x0,b,vy0,h,tol) 


其 中 ,funfcn 为 符 求 解 图 数 ;， ze 为 初 值 ; 2 为 工 右 吴 点 ; yo 为 初 值 ; 疡 为 进 代 步 长 : 
tol 为 求解 精度 。 
编写 加 后 欧 拉 方法 曙 数 文件 如 下 : 


function [XYnE] = Heulerl(tuntcn, x0,b, v0, h,tol) 
秆 funfcn 为 待 求解 函数 

x0 为 初 值 

b 为 工 右 端点 

Y0 为 初 值 

h 为 只 代步 长 

tol 为 求解 精度 

fix( (b— x0)/h); 

-eros(n+i+1,1):;: 


20 


ll 
MN 


eros(n+ 1,1); 


看 
| 
“= 


Yl1(k,:) = y0; 
多 绘图 
cle, x0, hn,vo0 
秆 产生 初 值 
fori=2:n+1 
xX(1i)= x0+h:; 
Y(i,:) = vy0+hx feval(funfcn, xO0O, v0); 
Yl(1,:) =y0+hx feval(lfunfcn,X(1),Y(1i,:)); 
秆 主 循 环 
Wu = abs(Y1l(1i,:)— Y(1i,:)):;: 
while Wu> tol 
p= Y1(21,:); 
Yl1(i,:)= y+hx feval(funfcn,X(i),p): 
0 
end 
XO = x0+h.; 
0= Y1(1,:); 
¥(i,:)= y0; 
plot(X,Y, 'ro') 
grid on 
xlabel(' 自 变量 X'), ylabel(' 因 变量 Y') 
title(' 用 向 后 欧 拉 公式 计算 dy/dx = f(x,yY),y(x0) = Y0 在 [x0,b] 上 的 数值 解 ') 
end 
X= All1l:n+i+1)- 
Y= Y(l:n+1,:}); 
n=1:n+i+].: 
P= [rn',X,Y| 


【 例 11-43】 用 向 后 欧 拉 公式 求解 区 间 L0,2」] 上 的 初 值 问题 


oy 一 一 3y 十 8z 一 7， y(0)=1 
dx 


的 数值 解 , 取 步 长 hh 二 0.05 ,并 与 精确 解 作 比较 ,在 同一 个 坐标 系 中 作出 图 形 。 然 后 再 取 
疡 一 0. 01 ,观察 数值 解 与 精确 解 误 差 的 变化 .说 明 户 与 误差 的 关系 。 


编写 该 初 值 问题 晒 效 程序 如 下 : 


function y= funfcn(x, y) 
了 (1) = 一 卫 关 了 十 日 关 开 一 了 ; 


end 


相应 的 主 程序 如 下 : 


Clce,clear ,close all 

Sl1l=dsolve('Dy=8x*x-—- 3x*y—7',y(0)=1', "x') 
x0 = 0; 

Y=1; 

有 = 三 之; 

tol=1.e— 1; 

subplot(2,1,1) 

hl = 0.01.; 

[Xl1,Y1,n,Pl] = Heulerl((@funfcn, x0,b, vO,hl,tol) 
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hold on 

S2= 8/3*x% Xl — 29/91+ 38/9 x% exp( — 3* Xl1), 
plot{(X1,S2,'b— ") 

hold off 

JuwYl1 = S2— Yl1; 

XI1WY] = juwYl1. vl 

L= [Fi,S2,jJuwYl, xiwYl | 


subplot(2,1 ,2) 

h=0.05; 

[X,Y,n,P] = Heulerl (funfen, x0,b, v0,h,tol) 
hold on 

S1 = 8/3*x X— 29/9 + 38/9 % exp( — 3 * XX), 
plot(X, S1,'b—') 

legend('h= 0.05 用 向 后 欧 拉 公式 计算 dy/dx = 8x 一 3y 一 7,Yy(0)=1 在 [0,2] 上 的 数值 解 ', 'dy/dx = 
8x 一 37 一 7,y(0)=1 在 [0,2] 上 的 精确 解 ') 

hold off 

JuwY= Sl —Y; 

XiwY = juwY. /Y:; 

DL= |[P,S1, juwY, x1iwY| 


运行 程序 ,输出 图 形 如 图 11-4 所 示 。 


hh=0.01 的 数值 解 
精确 解 国 


of 0.05 的 数值 解 
精确 和 佣 


一 -一 


1.5 
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图 11-4 向 后 欧 拉 数值 计算 


运行 后 屏幕 显示 用 向 后 欧 拉 公 式 计算 此 初 值 问 题 在 [0,2] 上 的 自 变量 X 处 数值 解 Y 
和 精确 解 S1 及 其 图 形 , 步 长 h 及 Y 的 相对 误差 xiwY 和 绝对 误差 juwY。 


11.2.3 椰 形 公式 


欧 拉 公式 的 一 般 形式 为 
y(CzerH) 一 yCzn) 一 | "~ f(x,y(z)) dr 
改写 成 梯形 求 积 公式 得 


Vatl 一 Vn | Sf, s Vn ) | | (Ean s Vntl ) | 和. 7 CO 0,1 有 s""" 
该 公式 称 为 梯形 公式 ,为 隐 式 公式 。 
在 MATLAB 中 编程 实现 的 棉 形 公 式 求 数值 解 的 隐 数 为 odtixingl] ()，。 
功能 : 用 梯形 公 云 求 数 值 解 。 
调用 格式 ; 


[X,Y,n,Pl= odtixingl (funfcn,x0,b,vy0,h,tol) 


其 中 ,funfcn 为 得 求解 函数 ; zxo 为 初 从 ;5 为 + 古 占 点; yo 为 初 但; h 为 和 达 代 步 长 ; 


tol 为 求解 精度 。 
用 梯形 公式 求解 程序 如 下 : 


function [X,Y,n,P|] = odtixingl (funfcn, x0,b,vy0,h,tol) 
和 Eunfcn 为 待 求 解 函数 


备 x0 为 初 值 
侍卫 为 工 耕 端点 


和 h 为 迁 代 步 长 
当 tol 为 求解 精度 
n= fix((b— x0)/h):; 
X= zeroslnt+1,1); 
Y= zeros(n+1,1):; 
瓜 三 工 : 
X(k) = x0; 
Thkr = vO 
Yl(k,:) = y0; 
秆 绘图 
Clce, x0,h,yo0 
第 产生 初 值 
OP = 过 二 | 
xX(1i)= x0+h; 
fxOvy0 = feval(lfunfcn, x0, y0); 
Y(i,:)= yy0+ hx fxOv0; 
fxivyi= feval(lfunfcn, X(2),Y(i,:)); 
Yl(i,::) =w0+ hx (fxivi1 fxa0v0)/2; 
先 主 御 环 
Wu= abs(Yi(1i,:)— Y(1,:)); 
while Wu2> tol 
p= 1l1,.:), 
fxip = feval(funfcn, X(i),p); 
Y1(i,:) = yw +h* (fx0v0 + fxip)/2, 
Pl = Y1(1i,:), 
Yl,:) = pl; 
end 
XO = x0+h; 
0= Yl1(1,:); 
WE 
plot(X,Y, 'ro') 
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grid on 
xlabel(' 自 变量 X'), ylabel(' 同 变量 Y') 
title(' 用 梯形 公式 计算 dy/dx = f(x, Vy),vy(x0)= v0 在 [x0,b] 上 的 数值 解 ') 
end 
X= X(1:n+1):; 
Te 
n= 三 1 :n+i+1; 
P= |[n",X,Y| 


【 例 11-5】 用 梯形 公式 求解 区 则 LO0,2」 上 的 初 值 问题 

人 一 一 3y 十 8r 一 +， AVKO) 一 ] 
取 步 长 二 0.05, 精 度 为 10 司 ,并 与 精确 解 作 比较 ,在 同一 个 坐标 系 中 夯 出 图 形 . 
编写 该 初 什 问题 困 效 程序 如 下 : 


function y= funfcn(x, vy) 
v(1)=-3xvyv+B8xx—7; 


end 


主 程序 如 下 : 


clc,clear,close all 

X00 = 0.; 

y0=1; 

b= 2- 

tol=0.1; 

h=0.05; 

[X, Yt, n, PE] = odtixingl ((@ funfcn, x0, b, vy0, h, tol) 
hold on 

Sl1 = 8/3 x X— 29/9 + 38/9 x exp( — 3 * X); 

plot(X, Sl1,'b—"), 

hold off 

legend('h = 0.05, 用 梯形 公式 计算 dy/dx= 8x 一 3y 一 7,vy(0)=1 在 [0,2] 上 的 数值 解 ','dy/dx = 8x 一 
3y 一 7,y(0)=1 在 [0,2] 上 的 精确 解 ') 

JuwYt = Sl1 — Yt; 

xiwYt = juwYt. /Yt:; 

Lt = [Pt, Si1, juwYt,xiwYt]| 


运行 程序 ,输出 图 形 如 图 11-5 所 示 。 
运行 后 屏幕 显示 取 精 度 为 10“ ,分 别 用 梯形 公式 和 向 前 欧 拉 公 式 求解 此 初 值 问题 在 
区 间 [0,2] 上 的 自 变 量 X 仆 数值 解 Y,(i= 二 t,g) 和 精确 解 Si、 步 长 hh.Y; 的 相对 误差 xiwYi 
和 绝对 误差 juwYi 及 其 数值 解 和 精确 解 的 图 形 。 

【 例 11-6】 用 目 适 应 梯形 公式 和 回 前 欧 拉 公式 分 别 求解 区 间 L0,2j] 上 的 初 值 问题 


一 一 3 十 8 一 7， vy(0)= 二 1 
dz - 


用 梯形 公式 计算 dy/dx= (x,y) yo 疡 mm 在 [xo bl] 上 的 数值 解 


2.3 


o =0.05， 用 梯形 公式 计算 dy/dxr=8x-3y-7, 
MO)=1 在 [0.2] 上 的 数值 解 -wp 
一 一 dyd=8r-3y-7, 0O 广 1 在 si 
[0, 2] 上 的 精确 解 
| 


因 变 量 7 


图 11-5 梯形 公式 数值 计算 


取 精 度 为 10 ,并 与 精确 解 作 比较 ,在 同一 个 坐标 系 中 作出 图 形 。 


编写 该 初 从 问题 函数 程 厅 如 下 : 


function y= funfcn(x, vy) 
vy(1)=—- 3xy+8%Xx—7; 
end 


癌 目 适应 楷 形 公式 求解 程 订 如 下 : 


function [H,X,Y,k,h,Pl] = odtixing2(funfcn, x0,b,v0,tol) 

当初 始 化 

pow = 1/3; 

if nargin <5 | isemptvy(tol), 
tol = ll.e—6; 

emd ; 

多 if nargin <6 | isempty(trace), 

守 trace = 0; 

守 end; 

X= XO.; 

h=0.0078125 # (b— x); 

Y= y0(:); 

p= 128; 

n= fix((b— x0)})/h):; 

H= zeros(p,1); 

X= zeros(p,1); 

Y= zeros(p, length( y) ); 

下 三 了 

X(k) = x; 

Tk =" 

和 绘图 

Cle, x, h,vy 

当主 循环 
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while (x<b)&(x+ h> x) 
if x+ h>b 
h=b-x; 
end 
各 计算 斜率 
fxy = feval(funfcn, x,y); fxvy = fxy(:); 
计算 误差 , 设 定 可 接受 误差 
delta = norm(h * fxy, 'inf'); wucha = tol x max(norm(vy, 'inf'}),1.0); 
当当 误差 可 接 党 时 重 写 解 
if delta < = wucha 
X=X+h; YL =vy+hx fxy; fxvyl = feval(funfcn,x,vyl); fxvy= fxvy(:):; 
v2=y+hx fxyl; y= (vl + y2)/2; k=k+i+1; 
if k> length(X) 
X= [Xi:zeros(p,1)]; Y= [Y;zeros(p, length(y))]; 
H= [H;zeros(p,1)|]; 
end 
H(k) = h;X(k) = x;Y(k,:) = Y'; plot(X,Y,'go'), grid 
xlabel(' 自 变量 X'),， ylabel(' 因 变量 Y') 
title(' 用 自 适 应 梯形 公式 计算 dy/dx = f(x,y),y(x0) = Y0 在 [x0,b] 上 的 数值 解 ') 
end 
当 更 新 步 长 
if delta~ = 0.0 
h=min(hx 8,0.9 x% hx (wucha/delta)’^pow).; 
end 
end 
if (x<b) 
disp( 'Singularity likely. '), Xx 
end 
H= H(l1:k}; 
X= AX(l1:k)-; 
Y= Tl:kE,: 1): 
n= 二 1]:k; P= |[n',H,X,Y| 


主 程序 如 下 : 


clc,clear,close all 


tol=1.e—1.， 

[Ht, X, Yt,k,h,Pt|] = odtixing2((@funfcn, x0,b, yo0,tol), 
hold on 

S1 = 8/3*#* X— 29/9 +38/9 x exp( — 3 * X), 

plot(X, S1,'b— '), 

hold off 

hold on, 

[Ha, X, Yq, KE h, El = QEuler((@funfcn, x0,b, YO,tol), 
hold off 

grid 


legend(' 用 自 适 应 梯形 公式 计算 dy/dx=8x 一 3y 一 7,y(0)=1 在 [0,2] 上 的 数值 解 ', 'dy/dx= 8x 一 
3y 一 7, y(0)=1 在 [0,2] 上 的 精确 解 ', ' 用 向 前 欧 拉 公式 计算 dy/dx=8x 一 3y 一 7,y(0)=1 在 [0,2] 
上 的 数值 解 ') 

title(' 自 适应 梯形 公式 计算 ') 


运行 程序 ,输出 图 形 如 图 11-6 所 示 。 


o 用 自 适 应 梯形 公式 计算 dy/dx=8x-3y-7, MO)=1 在 [0.2] 上 的 数值 解 
dy/dx=8x 一 3y-7, WO0=1 在 [0, 2] 上 的 精确 解 
去 用 向 前 欧 拉 公 式 计算 dy/dx=8x-3y-7, MO 六 1 在 [0.2] 上 的 数值 解 有 
| | 了 


因 变 量 7 


自 变量 
图 11-6 自 适 应 梯形 求解 


运行 后 屏幕 显示 取 精 度 为 10 ,分 别 用 自 适应 梯形 公式 和 向 前 欧 拉 公式 求解 此 初 值 
问题 在 区 间 L0,2] 上 的 自 变量 X 处 数值 解 Y;(i= 二 +:,gq) 和 精确 解 S1 及 其 图 形 、 步 长 h 等 。 


11.2.4 改进 欧 拉 公式 


用 梯形 公式 求解 弟 微 分 方程 的 初 值 问题 ,需要 解 含 有 y+li 的 图 数 方程 ,工作 量 稼 各 
很 大 ,因此 ,在 实际 问题 求解 时 ,可 将 欧 拉 方 法 和 梯形 方法 结合 来 进行 计算 ,来 用 以 下 达 
代 格 式 : 
(Yr 一 yn hf rn yn) 
» k=0,.1 2: 
1 一 Vn 十 SLflz, "Vn ) 下 f (Tal a 
迁 代 直到 | yy 了? 了 一 y 宫 | 寺 e 时, 取 yn 二 yi。 
改进 的 欧 拉 公式 弟 与 为 
(ys = 
| 一 Yn 下 hf (Xntl ys Ys) 
| yat 一 本 (yy 


改进 的 欧 拉 公 陈 写成 泰勒 级 效 形 陈 为 


pd = bs: 


亲人 字 避 六 


[re 
r= 


-大 为 (总 ) 
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z i (ze Cn) 
yKzatH) 一 yza) 二 > 十 i Ep -OO!) 


则 有 改进 的 欧 拉 公式 误差 表达 式 为 
Vy Tnt1) 一 WeH 一 OR) 
由 此 可 知 改 进 的 欧 拉 方法 是 二 阶 方 法 。 
在 MATLAB 中 编程 实现 的 改进 的 欧 拉 公式 求 数值 解 的 函数 为 gaiEuler () 。 
功能 : 用 改进 的 欧 拉 公式 求 数值 解 。 
调用 格式 : 


[H, X,Y,k,h,P| = gaiEuler(funfcn, x0,b, vy0,tol) 

其 中 ,funfcn 为 每 求解 明 数 ; ro 为 初 全 ;2 为 工 右 病 点 ; yo 为 初 什 ; hh 为 从 代步 长 ; 
tol 为 求解 精度 。 

改进 的 欧 拉 公式 求解 程序 如 下 : 


function [H,X,Y,k,h,Pl = gaiEuler(funfcn, x0, b, Yo, 七 D1) 
各 funfcn 为 待 求解 函数 


侍卫 为 工大 端点 


和 卫 为 选 代 步 长 
第 tol 为 求解 精度 
千 初始 化 
pow = 1/3; 
if margin<5 | isempty(tol), 
tol = l.e—6; 
end:; 
SS if nargin <6 | isemptvy(trace), 
守 trace = 0，; 
当 end; 
X= XO.; 
h=0.0078125 x (b— x); 
Y™ VOU:); 
p= 128; 
n= fix((b— x0)/h); 
H= zeros(p,1); 
X= zeros(p,1); 
Y= zeros(p, length(v) ); 
KE 二 1]- 
X(k)= xXx; 
Ylk,:) = "i 
多 绘图 
le, Xx, h,v 
向 end 
和 当主 御 环 
while (x<b)&(x+ h> x) 
if x+ h>~>b 
h=b- x; 


end ek 
% 计算 斜率 上 
fxy = feval(funfcn, x, vy); 他 
fxy= fxy(:) 
各 计算 误差 , 设 定 可 接受 误差 全 
delta = norm(h x fxy, 'inf'); em 
wucha = tol x max(norm(vy, 'inf'}),1.0); 求 


当当 误差 可 接 党 时 重 写 解 
if delta<= wucha 
=X+h; vl = y+ hx fxy; fxyl = feval(funfcn, x, vl )}):; 
fxy= Fry(:) ;v2 = (fxv t Erxyl)/2; y= vithx v2 k= EtI; 
if k> length(X) 
X= [Xi:zeros(p,1)]; Y= [Y;zeros(p, length(y))]; 
H= [H;zeros(p,1)|]; 
enid 
H(k) = h; X(k) = x;Y(k,:) = yY'; plot(X,Y, "mh'), grid 
xlabel(' 自 变量 X'), ylabel(' 因 变量 Y') 
title( ' 用 改进 的 欧 拉 公式 计算 dy/dx = f(x,Y),Y(x0) = Y0 在 [x0,b] 上 的 数值 解 ') 
end 
各 更 新 步 长 
if delta~ = 0.0 
h=min(hx 8,0.9 x hx (wucha/delta)“pow); 
end 
end 
if (x<b) 
disp( 'Singularity likely. '), Xx 
end 
H= H(l1:k):- 
w= XLT): 
人 
下 二 二 :Kk; 
P= [n',H,X,Y] 


【 例 11-73】 用 改进 的 欧 拉 公式 求解 区 则 L0,2」 上 的 初 值 问 题 : 
OY 一 一 3 十 br 一 (， ywCO) 一 
取 精 度 为 10”。 编 写 该 初 值 问题 阴 数 程序 如 下 : 


function y= funfcn(x, vy) 
vl1) =— 3#xy+B¥A—7; 


end 
主 程序 如 下 : 


clc,clear,close all 
x0 = 0.; 
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yO0=1; 

b=2.;: 

tol=1.e—1; 

[Ht, X, Yt,k, EL] = odtixing2( (@ funfen, x0,b, v0,tol) 
hold on 

S1 = 8/3* X— 29/9 +38/9 x exp( — 3*x X), 
plot(X, S1,'b—') 

hold off 

| hold on 

[H, X,Y,k,h,Pl = gaiEuler( (funfen, x0,b, v0,tol) 
hold off 


运行 程序 ,输出 图 形 如 图 11-7 所 示 。 
] 。 用 改进 的 欧 拉 公式 计算 dy/dx= f(x, y), ywo)=yo 在 [xo, 可 上 的 数值 解 


用 梯形 公式 计 算 dy/dx=8x- 3y-7, MO)=1 在 [0. 2] 上 的 数值 解 
dy/dx=8x-3y-7. XA0)=]1 在 [0, 2] 上 的 精确 解 
言 ” 用 改进 的 欧 拉 公式 计算 dy/dx=8x-3y-7, y(0)=1 在 [0, 2] 上 的 数值 解 

| | | | 
| | | 
| | 


I 
I 
| | | 
' .5 上- 一- = 一 一 
上 | 
1 
| 


i 


图 11-7 改进 欧 拉 公式 求解 


| 运行 后 屏幕 显示 取 精 度 为 10” ,分 别 用 梯形 公式 和 改进 的 欧 拉 会 式 求 此 解 初 值 问题 
在 区 间 L0,2」 上 的 目 变 量 X 人 处 数值 解 Yt 、Y 和 精确 解 S， 及 其 图 形 、 步 长 h、Y 的 相对 误差 
xiwY 和 绝对 误差 juwY 。 


11.3 龙 格 - 库 塔 方法 


龙 格 一 库 塔 公式 可 以 写 为 
1 一 .yn 机 hnK 
(K, dd 
| 改进 的 龙 格 一 库 塔 公式 可 以 写 为 


| Yrtl 一 yn 十 SK 1 Kz) 
| 五 1 = f(xrn: Yn) 分 
| = _ 太 zeHyye hk 1) 程 
由 此 推出 一 般 推 广 式 ,如 下 : 组 
[yan = yn hCCIKi + CK CoK ,) 求 
Ki = fxr, yn) 
K; = f(xn 十 az 天 ,wa hbz Ki1) 


p—l 
kK, = f(z ahsyrs Th ouK ;| 
i 二 1 


11.3.1 二 阶 龙 格 - 库 塔 法 


对 于 二 队 龙 格 - 库 塔 法 , 即 p 二 2, 则 得 到 相应 的 式 于 为 

[Yn = yn 十 大 (CI 天 1 十 人 天 2) 

全 ,人生 

[K;: = f(x azh ,yn 十 122 天 1) 

式 中 ,C1,Cz ,az ,Pz 为 待定 系数 。 由 泰勒 级 数 展开 , 取 其 中 一 个 解 , 即 
『 ] 


2 
要 
2 

2 =—— 1 


[| B21 一 ] 

将 上 式 变 形 为 

『 1 了 

Yatl 一 Yn | 2 (Ki | K,) 

人 一 1 » Yn) 

要 四 f(r | h "Vn 1 hK 1) 
在 MATLAB 中 编程 实现 的 二 阶 龙 格 - 库 培 法 的 限 数 为 Runge_Kutta_2()，。 
功能 : 用 二 阶 龙 格 - 库 培 法 函数 求解 微分 方程 值 。 
调用 格式 : 
yl = Runge Kutta 2(funfcn,xmin, xmax, vy0,h) 
其 中 ,funfcn 为 求解 的 常 微分 方程 ; zmn 为 工 的 取 值 最 小 值 ; zmx 为 工 的 取 值 最 大 值 ; 

xo 为 初始 值 ; hh 为 迭代 步 长 。 

二 阶 龙 格 - 库 培 法 晴 数 如 下 : 
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function yl = Runge Kutta 2(funfcn, xmin, xmax, vy0,h) 
千 funfcn 为 求解 的 常 微 分 方程 
多 xmin 为 区 的 取 值 最 小 值 
向 xmax 为 的 取 值 最 大 值 
第 Y0 为 初始 值 
委 h 为 选 代 步 长 
XxX = Xmin:h:xmax; 
Y(1) = Z0; 
n = sizel(lx) 
for i=1:n(l1,2)} 
kl = funfcn(x(1,1),v(1,1)); 
k2 = funfcen(x(1,i)+h,v(1,i)}+hx Kl); 
vy(i+1) = vy(i)+h/2*x (kl + k2); 
end 
yl=y(1l,1:n(1,2)); 


【 例 11-8】 用 二 阶 龙 格 - 库 塔 方法 求 初 值 问 题 : 


TE | 


确 解 和 数值 解 的 图 形 ，。 
计算 该 初 值 问题 的 精确 解 , 编 程 如 下 : 


clc,clear,close all 


y= dsolve( (Dy}) + (2x* xx vy)/(1+x*2)—-—-1=0','y(0) = 0"', 'x') 
运行 程序 ,输出 结果 如 下 : 


¥ 三 
(x (x*2 + 3))/(3x (x*2 + 1}) 


编写 该 初 值 问 题 限 数 程 订 如 下 : 


function y= funfcn(x, vy) 
YY(1)}=1-2xxxyY./(l1+x. x); 


end 


编写 积分 图 数 程 序 如 下 : 


function y= fun(x) 
y= (x+1/3xx"*3)/(1+x"*2); 


end 


调用 该 龙 格 - 库 培 盟 数 文 件 ,编程 如 下 : 


clc,clear,close all 


v= dsolve('(Dy) + (2*#* x y)/(1+x"2)—-—-1=0','y(0)=0"', 'x') 


x0 = 0.; 
b=2- 


C= [1/4,3/4,2/3,2/3]; 


YO0= 0; 
h=1/4: 


P= Runge Kutta 2(funfcn, xmin, xmax, y0,h) 


运行 程 订 ,输出 结 末 如 下 : 


Pp = 
. 0000 
. 0000 
.0000 
. 0000 
. 0000 
. 0000 
. 0000 
. 0000 
.0000 


加 让 克 上 博 


2 OO DO 


0 


. 2500 
- 32000 
- 17500 
.0000 
.200 
- 353000 
. 1500 
.0000 


= 


输出 图 形 如 图 11-8 所 示 。 


因 变 量 了 


1.0 


0.9 


0 0 
0.2402 0.0124 
D0.4333 0.0299 
D0.5700 0.0352 
0.6667 0.0288 
0.7419 0.0167 
0. 8077 0.0034 
D0.8705 0.0089 
0. 9333 0.0196 


一 友 一 用 二 上 阶 龙 格 - 麻 塔 方法 计算 数值 解 
-名 一 J/dx= (x y), yx0)=yo 的 精确 解 y=Ax) 一- 


图 11-8 


二 阶 龙 格 - 库 塔 法 求解 


= 
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11.3.2 三 阶 龙 格 - 库 塔 法 


对 于 三 阶 龙 格 - 库 塔 法 ,同样 有 
Ya = Yn ThCCIKi1 Ce Ks CaK;) 
| Kl1 一 fxn Yn) 
二 = f(x azh, Yn ho Ki1) 
[Ks = fxn ashs yn hoaKi tt hos kK:) 
同样 对 于 三 阶 龙 格 - 库 培 法 其 变形 式 为 
[es 一 Yn 1 (Ki 4K; 十 下:) 


2 
i 2 
f(x | 了 *» Va | 2 Kl ) 
(Ks, = f(x hy OO— hk 2hKk >) 
在 MATLAB 中 编程 实现 的 三 阶 龙 格 - 库 培 法 的 负数 为 Runge_Kutta_3()。 
功能 : 用 三 阶 龙 格 - 库 塔 法 基数 求 解 微 分 方程 信 。 
调用 格式 : 
Yl = Runge Kutta 3(funfcn,xmin, xmax,y0,h) 
其 中 ,funfcn 为 求解 的 弟 微 分 方程 ; zmn 为 工 的 取 值 最 小 值 ; zmax 为 工 的 取 值 最 大 值 : 
yo 为 初始 值 ; 疡 为 迭代 步 长 。 
三 除 龙 格 - 库 塔 法 图 数 如 下 : 


KK: 


function yl = Runge Kutta 3(funfcn, xmin, xmax, vy0,h) 

多 funfcn 为 求解 的 常 微 分 方程 

名 xmin 为 x 的 取 值 最 小 值 

和 xmax 为 x 的 取 值 最 大 值 

第 Y0 为 初始 值 

和 上 为 选 代 步 长 

xX = xmin:h:xmax; 

y(1) = YO; 

n = size(x) 

for i=1:n(l1,2) 
kl1 = funfcn(x(1,1),v(1, 1i)): 
k2 = funfcn(x(1,i) + h/2,vy(1,i) +h/2 x kl1); 
k3 = funfcn(x(1,i)+h,v(i,1)—-hxFKl+i+2x hx k2).; 
y(i+1) = vy(i)+h/6 x% (kl+ 4x% k2+ k3); 

end 

Yl = Yl1i,1:n(1,2)); 


【 例 11-9】 用 常用 的 三 阶 龙 格 - 库 培 公 式 求 初 值 问题 : 


『 a | VY 


| dz 一 ] ] | i 2 9 0 二 ~- 区 = 2 党 
微 
ty |z=o 一 0 分 
的 数值 解 ; 取 ==1/6,Cz= 二 4/6,Cs= 二 1/6, azs 二 ba 二 1/2ya3 二 1b 一 一 1;63z 一 2;h 二 1/4, 并 


计算 与 精确 解 的 误差 , 面 出 精确 解 和 数值 解 的 图 形 ， 组 
计算 该 初 值 问题 的 精确 解 ,编程 如 下 : 求 


clc,clear,close all 


y= dsolve('(Dy) + (2x xxy)/(1+x*2)—-1=0','y(0)=0', 'x') 


运行 程 厅 ,输出 结 来 如 下 : 


(x (x*2 + 3))/(3* (x*2 + 1)) 


编写 该 初 值 问 题 滑 数 程 厅 如 下 : 


function y= funfcn(x,yY) 
vy(1)=1-2xxxv./(l+x. x x); 


end 


编写 积分 图 数 程序 如 下 : 


function y= fun(x) 
VI 
end 


调用 该 龙 格 - 库 塔 哨 数 文件 ,编程 如 下 : 


clc,clear,cCclose all 

y= dsolve( (Dy) + (2x xx y)/(1+x*2)—-1=0','y(0)=0"', 'x') 
x0 = 0; 

b= 2; 

cl= 1/6; 

2= /6- 

a 

a2 = 1/2; 

a3= 荆 ， 

2 

b31 = 一 荆 ; 

b32 = 之 ; 

CG= [cl ccC3,.a2, 3, bl, 3 532 |; 
y0= 0; 

hn= 1/4; 


P= Runge Kutta 3(funfcn, xmin, xmax, yY0,h) 


EEI 目 


P=- =--- MATLAB 科 学 计算 


运行 程序 ,输出 结 采 如 下 : 


Pp = 
1.0000 0 0 0 0 0 
2.0000 D0. 2500 D0. 2293 0.2402 0.0109 2 
3.0000 0.5000 0.4070 0. 4333 0.0263 QO.1771 
4.0000 0.7500 0.5394 D0.5700 0.0306 0.1324 
5.0000 1.0000 0.6426 0.6667 0.0240 0.1032 
6.0000 1.2500 D0. 171295 0.7419 0.0124 0.0868 
7.0000 1.5000 D0. 8079 D0. 8077 0. 0002 0.0785 
8.0000 1.7500 0.8825 D0.8705 0.0120 0.0746 
9.0000 2. 0000 0 .95535 人 .9333 D0. O222 0Q.0730 


输出 图 形 如 图 11-9 所 示 。 


一 斌 一 用 三 阶 龙 格 一 库 塔 方 法 计算 的 数值 解 
-~ 一 曰 一 MWdx= /f(x,y), Vr0)]=yo 的 精确 和 解 半 (x) 一 - < 


1 I | 


| | 
| I 
一 一 一 一 厂 一 一 一 站 一 一 一 - 
| I 
| | 
1 | 


因 变 量 7 


图 11-9 三 阶 龙 格 - 库 塔 法 求解 


11.3.3 四 阶 龙 格 - 库 塔 法 


对 于 四 阶 龙 格 - 库 塔 法 ,有 
(ya = Ya hCCIK TF CK CK CK,) 
| 
I 
5 
(Ks, = 三 Cr aahs yn honKi hosK;s hoaaK;s) 
同样 对 于 四 除 龙 格 - 库 塔 法 其 变形 式 为 


yt = 外 -eK SR | 2Rs | Ry 
Ki fxn s Vn 


a K: 一 f(x | 全 ,yn | ye ) 


~ 
| 


f(x» 1 全 ,yy | SK, ) 


(Ks, = f(x hs yn hK 3) 
在 MATLAB 中 编程 实现 的 四 阶 龙 格 - 库 塔 法 的 因数 为 Runge_ Kutta_4() 。 
功能 : 用 四 阶 龙 格 - 库 培 法 申 数 求解 微分 方程 值 。 
调用 格式 : 


Yl = Runge Kutta 4(funfcn,xmin, xmax,y0,h) 


其 中 :funfcn 为 求解 的 第 微 分 方程 ; znn 为 工 的 取 值 最 小 值 ; zmax 为 工 的 取 值 最 大 值 ; 
》 为 初 怒 伸 ;为 达 代 步 长 。 


四 阶 龙 格 - 库 培 法 函数 如 下 : 


function yl = Runge Kutta 4(funfcn, zxmin, xmax,v0,h) 

第 Eunfcn 为 求解 的 常 微分 方程 

秆 Xman 为 工 的 取 值 最 小 值 

向 xmax 为 工 的 取 值 最 大 值 

当 Y0 为 初始 值 

sh 为 迁 代 步 长 

XxX = XMmin:h:xmax; 

vy(1) = yO; 

n = size(x) 

for1i=1:n(l1,2) 
k1 funfcn(x(1,21),v(1,1)); 
k2 = funfcn(x(1, 1) + h/2, v(1, zy + h/2 x k1): 
k3 = funfcn(x(1,i)} + h/2,vy(1,i) +h/2 x k2); 
k4 = funfcn(x(1,i)+h,v(i,1)+hx k3); 
yi+1) = vli}+h/6x (kl +2xk21+2%k3+kd); 


end 
了 三 vill,li:n(l1,2)); 


【 例 11-10】 用 常用 的 四 阶 龙 格 - 库 塔 公 式 求 初 值 问 题 ， 
(dy 1 .22 ,0<i< 
人 人 Ts” DE 工 志 . 2 


1， | 工 一 0 一 0 


的 数 伸 解 ,二 1/4, 并 计算 与 精确 解 的 误差 ,在 同一 图 形 窗 口 画 出 二 阶 龙 格 - 库 塔 法 、 三 阶 
龙 格 - 库 培 法 、 四 阶 龙 格 - 库 塔 法 的 精确 解 和 数值 解 的 图 形 ， 


计算 该 初 值 问 题 的 精确 解 ,编程 如 下 


Clc,clear, Close all 
了 = dsolve( (Dy)}) + (2x* xx vy)/(1+x*2)—-1=0','y(0) = 0"', 'x') 


《5 且 
CA 


了 程序 .输出 结果 如 下 : 


全 
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阶 、 四 阶 龙 格 - 库 塔 法 进行 对 比 。 程 序 如 下 : 


i 
一 
一 一 一 一 睛 


在 MATLAB 命令 行 Windows 窗口 输入 程序 如 下 : 


人 所 
| 
山 < 加 到 
这 和 让 
图 也 过 
过 间 和 如 
站 本 性 芭 
x 光 下 机 
Wn ! wn 
王 中 香 


b32 = 2; 组 
C= [ec1,c2,c3,a2, a3, b21,b31, b32]; 求 
[k, X,Y, fxy,wcoch, wucha, 了] = Runge Kutta 3((@funfcn, (®fun,xO0,b,C,v0,h) 解 


subplot(3,1,3) 
cl = 1/6; 
c2 = 2/6; 
c3 = 2/6; 
c4 = 1/6; 
a2 = 1/2; 
a3 = 1/2:; 
ad4d=1; 
b21 = 1/2: 
b31 =0; 
b32= 1/2; " 
b4l1 = 0; 
bA2=0; 
b43=1; ' 
C= [cl,c2,c3, cd4, a2, a3, ad,b21,b31,b32,b41, bd2 bd43 |]; 

[k, X,Y, fxy, woh, wacha, P] = Runge Kutta 4((@funfcen, (fun,xO0,b,C,v0,h) 


运行 程 订 ,输出 结 采 如 图 11-10 所 示 。 


0.5 | 


变量 7 


放 


 - 妆 - 用 三 阶 龙 格 - 库 塔 方法 计算 的 数值 解 / 一 厅 :下 | 
一 e 一 ydx= A(x, 9), MxX0 三 yo 的 精确 和 解 y= (x) 草本 和 We 
| | | i 


因 变 量 了 


- 喜 - 用 四 阶 龙 格 - 库 塔 方法 计算 的 数值 解 = 
Mx0) 三 yo 的 精确 和 解 y= J 了 (0) | i i ' 


因 变 量 了 


图 11-10 龙 格 - 库 塔 法 对 比 求解 图 
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【 例 11-11】 分 别 用 二 阶 数 值 方法 求 初 值 问 题 : 


J pe 2 工 0 we 1.2 


的 数值 解 ,精确 到 10“ ,计算 它 与 精确 值 的 绝对 误差 和 相对 误差 ,并 夯 出 精确 解 和 数值 解 
的 图 形 。 
计算 该 初 值 问题 的 精确 解 , 编 程 如 下 : 


clc,clear,close all 
y= dsolve('(Dy)— 2x#% x/(3x* yy”2) =0', vy(0) = 1°','x') 


运行 程序 :输出 结 采 如 下 : 


Y = 
3*(1/3) % (x*2/3 + 1/3)*(1/3) 


编写 该 初 值 问 题 限 数 程 序 如 下 : 


function y= funfcn(x,v) 
wl)}=—2xx/(3x*Yy"*2); 
end 


编写 曙 数 主 程序 如 下 : 


clc,clear,close all 

v= dsolve('(Dy) — 2x x/(3*#*y"”2)=0', yy0) = 1','x') 
options = odeset( 'RelTol', le— 4,'AbsTol', le— 4); 
[t, Y] = ode23(@funfcn, [0 1.2],1,options) ， 

TE (It 2411 "1173) 

plot(t, y(:,.1), IDP 一 一 ,tt,yf,'bo—— '); 

grid 

xlabel(' 自 变量 X')， 

ylabel(' 因 变量 Y') 

legend( ' 数 值 解 ', ' 精 确 解 y= f(x)') 

juew = yf(:,1) — y(:,1), 

xiangw = juew. /vfE(:,1), 

[t, y, yf, juew, xiangw | 


运行 程序 ,输出 图 形 如 图 11-11 所 示 。 
【 例 11-12】 求 下 列 方程 组 : 


Ee NN 之 二 2s1nx 
dz 

JJ- 一 一 998y 一 999z 十 999k4cos 工 一 Sinz) 
dx 

» [= 一 L 

“之 | T=0 一 


pd = bs: 


3 


一 舱 一 - 用 二 阶 龙 格 - 库 塔 方法 计算 的 数值 解 
”一 后- dy/dx=2x/(3y), M0 丘 1 的 精确 解 y= (x) 
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因 变 量 了 


图 11-11 ode23 求解 


在 L0, 1.2] 上 的 数值 解 , 精 确 到 10“ :将 计算 结果 与 精确 值 比 较 , 并 画 出 精确 解 和 数 
值 解 的 图 形 。 
计算 该 初 值 问题 的 精确 解 ;编程 如 下 : 


clc,clear,close all 

SYmS XYy2Z 

f= '(Dy) — 2x sin(x) -z+2xy=0,(Dz) +999 x sin(x) 一 999x cos(x) + 999¥ z— 998 xy=0'; 
[yr HeelE 0 2 0 3 


运行 程序 ,输出 结 采 如 下 : 


Y pe 
2x% exp( — x) + sin(x) 


2 exp(— x) + cos(x) 


编写 该 初 值 问 题 限 数 程 订 如 下 : 


function y= funfecn(x, vy) 
vy=[—21;998 一 999] x*u+t+[2x sin(x); — 999sin(x) + 999 x cos(x)]; 
end 


编写 相应 的 主 程序 如 下 : 


Clc,clear,close all 

SYmMS XYZ 

f= '(Dy) — 2 x sin(x) —z+2xvy=0,(Dz) + 999 x sin(x) — 999 x cos(x) + 999*z— 998 xy=0'; 
[yz| = dsolvelf, "yy(0) = 2,z(0) = 3", "x") 

options = odeset( 'RelTol', le 1,'AbsTol',[le—1,le—11]1): 


FEF 
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[t, yi]= odelss((@funfcn,[0 10],[2 3],options) 
vf=2 x exp(—t) + sin(t); 
zf = 2 *% exp( —t) + cos(t); 
plot(t, yl1(:,1), mo—— ,tt, yl(:,2), 'rp-—— '); 


hold on 


Blotlt veEr bo" EZE "gq 


hold off 
grid 


xlabel(' 自 变量 X'), ylabel(' 因 变量 Y') 


运行 程序 ,输出 结果 如 下 : 


Yl = 
2.0000 3.0000 
1. 1911 2.3781 
1.6784 1.7111 
1.5900 1.1885 
1.0223 ee 
0. 71510 一 0.6606 
0.4262 = 0.8153 
0.0769 一 0.9640 
一 0.5406 — D0. 7630 
= 0.2198 
一 .89.32 0.4149 
一 0.4920 D0. 8672 
0. 2270 四 .353 
0.8432 0.5047 
0.9993 一 0.1969 
0.53963 一 0.7886 
— 0.1427 一 0.9424 
一 0.5248 — 0.8198 


因 变量 了 
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odel5s 求解 


【 例 11-13】 下 面 比较 ode45 和 odel5s 的 计算 时 间 ,编写 程序 如 下 : 


clc,clear,close all 

te- 

pl = ti1c; 

options = odeset( 'RelTol', le— 1,'AbsTol',[le—1,le— 1]):; 
[t,vy1]= ode45((@funfcn,{[0 10],[2 3], options):; 

pz2 = toc; 

tode45 = toc, 

pode43 = P2 — pl, 

tc- 

p3 = ti1ic:; 

options = odeset( 'RelTol', le— 1,'AbsTol',[le—1,le— 1]):; 
[t, y2] = odels5s((@funfcn, [0 10],[2 3], options):; 

p4 = toc; 

todelSss = toc, 

podel5s = p4— p3 


运行 程序 ,输出 结 采 如 下 : 


tode45 = 
0.9226 
pode45 = 


todelSss = 
0.0101 
podelSss = 


由 此 可 以 看 出 ,对 于 刚性 方程 组 ,用 odel5s 求 数值 解 比 用 ode45 速度 快 许多 ， 
【 例 11-14】 给 定 初 值 问 题 y 二 一 20y,0 夺 zx 夺 2,y(0) 二 1( 精 确 解 为 > 一 e *”) ,用 龙 
格 - 库 培 四 阶 算法 按 步 长 A= 王 0.05:0.1,0.2 求 解 ,分 析 其 中 遇 到 的 现象 及 问题 。 
编写 y 一 一 20y,0 和 z 委 2,y(0) 一 1 函数 文件 如 下 : 
function dy = diff fun(x,y) 
dy = zeros(1] ); 


dy 一 — 20 XT; 


end 


编写 相应 的 精确 解 > 一 e 六 函数 文件 如 下 : 
functiony = fun(x) 


Y= exp( — 20 * x); 
end 


当 步 长 4 一 0. 05 时 ,编程 调用 四 阶 龙 格 - 库 塔 法 程序 求解 如 下 : 


clc,clear,close all 


-re 
寺中 对 | 
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Y0 = 1; 当初 值 
ml 0 名 步 长 
lL 名 步 长 
n3 = 0.2.; 当 步 长 
xmin = 0; 

xmax = 1; 

xl = xmin:hl :xmax:; 

当 精 确 解 


yz = fun(xl ):; 

第 四 阶 龙 格 - 库 塔 法 

y= Runge Kutta 4((@diff tun, xnin xmax, y0, hl ); 

plot(xl ,vy, ro—— ','linewidth’',2), 

hold on 

plot(xl, vz, ‘bs —— ,linewidth',2) 

grid on,xlabel(' 自 变量 X')，, vlabel(' 因 变量 Y') 

legend(' 四 阶 龙 格 一 库 塔 公 式 计 算 的 数值 解 ', ' 精 确 解 y= exp( 一 20x)') 


运行 程序 ,输出 图 形 如 图 11-13 所 示 。 


_! 一 一 四 阶 龙 格 一 库 塔 公式 计算 的 数值 解 
I 一 旦 一 精确 和 解 y=exp( 一 20x) 


因 变 量 了 


自 变量 X 
图 11-13 步 长 hh 二 0.05 函数 解 曲线 
当 步 长 一 0. 1 时 ,编程 调用 四 阶 龙 格 - 库 塔 法 程序 求解 如 下 : 


clce,clear,close all 


Y0 =1; 先 初 值 
1 名 步 长 
hz = 0.1:; 名 步 长 
bh3 = 0.2; 名 步 长 


xl1] = xmin:h2:xmax; 
币 精确 解 
Yz = fun(xl ); 


委 四 阶 龙 格 - 库 塔 法 


y= Runge Kutta 4( (中 diff tun, xmnin xmax, y0, h2 ); 


plot(xl,y, ro—— ,linewidth’',2), 
hold on 
plot(xl, vz, ‘bs —— ,J]inewidth',2) 


grid on,xlabel(' 自 变量 X'), Vylabel(' 因 变量 Y') 
legend( ' 四 阶 龙 格 一 库 塔 公 式 计 算 的 数值 解 ', ' 精 确 解 y= exp( 一 20x)') 


运行 程序 ,输出 图 形 如 图 11-14 所 示 。 


因 变 量 了 
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一 一 旦 一 精确 解 )=exp( 一 20x) 
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当 步 长 一 0.2 时 ,编程 调用 四 阶 龙 格 - 库 塔 法 程序 求解 如 下 ， 


clc,clear,close all 


XlL = xmin:h3:xmax; 
和 精确 和解 

yz = fun(xl )}):; 

各 四 阶 龙 格 - 库 塔 法 


y= Runge Kutta 4((®diff fun,xmin, xmax, y0, h3 ); 


plot(xl,y, ro—— ,linewidth’',2}), 
hold on 
plot(xl, yz, bs 一 一 'J]inewidth',2) 


各 初 值 
千 东 长 
千秋 长 
和 村落 长 


grid on,xlabel(' 自 变量 X'), ylabel(' 因 变量 Y') 
legend( ' 四 阶 龙 格 一 库 塔 公式 计算 的 数值 解 ', ' 精 确 解 y= exp( 一 20x)') 


运行 程序 ,输出 图 形 如 图 11-15 所 示 。 
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图 11-15 步 长 hh 二 0.2 函数 解 曲线 


对 比 图 11-13 一 图 11-15 可 知 , 订 用 四 阶 龙 格 - 库 培 法 进行 症 微 分 方程 的 求解 ,其 步 长 
的 取 值 较为 关键 。 当 步 长 过 大 时 ,如 图 11-15 所 示 , 解 曲线 误差 很 大 ,日 发 散 。 当 步 长 合 
适 , 较 小 时 ,如 图 11-13 所 示 , 解 曲线 和 精确 解 曲 线 基 本 吻合 。 综 全 上 述 分 析 ,因此 对 于 一 
般 微 分 方程 的 求解 ,应 注意 步 长 的 选取 。 


11.4 亚当 斯 方法 
亚当 斯 方法 利用 已 经 算出 来 的 硅 十 个 yr yn-19Yn-20 呈 Yn-k，""“* 来 求 得 yn+1 的 方法 ， 
由 于 这 种 方法 在 计算 w+ 时 ,用 到 了 前 面 多 步 的 值 ,因此 称 这 样 的 方法 为 线性 多 步 法 。 
对 常见 的 一 阶 常 微分 方程 位 二 (zx,y) 而 言 ,将 昏 二 (x,y) 两 边 同时 对 xz 在 区 间 
[x ,zat1] 上 积分 有 
yCzeHl) — yxn) 一 | Fe 
对 于 被 积 函 数 /x,y) ,如 果 用 插值 多 项 式 Cz) 代替 ,那么 上 式 变 为 
Yatl 一 Yn 二 | | $n Cz) RCx) |d 
当选 择 不 同 的 插值 点 作 插 值 多 项 式 时 , 则 得 到 不 同 的 数值 分 析 结果 。 


11.4.1 亚当 斯 外 推 公 式 
设 x, ;YT )) = ,选择 四 个 插值 节点 Czv， 厂 js (Tel ey ) 《TE » fn—z)? a . 


fx-3) 作 三 次 插值 多 项 式 加 (x) ,误差 为 R(x)。 
略 去 相应 的 误差 有 


Yatl 一 Vn | 55 59 fn 入 37 fn2 9 fn—3) 
局 部 截断 误差 为 
Il ss (tyre 


在 MATLAB 中 编程 实现 的 亚当 斯 法 求 数值 解 的 函数 为 Adams4x () 。 
功能 : 用 亚当 斯 法 求 数值 解 。 
调用 格式 : 


[k, X,Y, wucha,P| = Adams4x(funfcn,x0,b,v0,h) 


其 中 ,funfcn 为 每 求解 限 数 ; zo 为 初 值 ;0 为 工 石 请 点 ; yo 为 初 值 ; h 为 迭代 步 长 ; 


PP 包括 上 有 上, 六,Y ,wucha 数值 。 


用 亚当 斯 法 求解 程序 如 下 : 


function [k, X,Y,wucha,P] = Adams4dx(tuntcn,x0O,Db, Yo hl) 

各 funfcn 为 竺 求 解 函数 

秆 x0 为 初 值 

竺 了 为 瑟 右 端点 

竺 Yy0 为 初 值 

委 h 为 迁 代 步 长 

竺 卫 包括 Kk, 义 , Y, wucha 数值 

X= XO ， 

Y= ¥0; 

p= 128; 

n= fix( (b— x0)/h); 

if n< 5s, 
return, 

end:; 

X= zeros(p,1); 

Y= zeros(p, length(y) ); 

f= zeros(p,1); 

KE 二 1]- 

xX(k) = x; 

Y(k,:)=Y"; 

fork=2:4 
cl=1/6;c2= 2/6;c3 = 2/6; 
cd4=1/6;a2= 1/2; a3 = 1/2.; 
Ad=1;b21= 1/2;hal= 0: 
b3z2= 1/2;: BAl = 0- 
bA42 = 0;b43 = 1; 
Xl1] = XxX+azxh; 
X22 = XX+ a3xh; 
X33 = 二 + adx h; 
kl = feval(funfcn, x, T) ; 
Yl =y+b2l1l x hx kl; 
X= XX+h; 
k2 = feval(funfcn, xl1, v1); 
Vy2= y+b31 x hx kl+b32x hx k2; 
k3 = feval(funfcn, x2, y2); 


~ 
D3 国 
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y3=y+bAl x hx kl +bA2*x hx k2+b43*# ha* k3; 
kA = feval(l(funfcn, x3, vy3):; 
v=y+thx (cl x kli+c2x k2+c3x% k3+ cd x kd); 
X(k) = x; 
Y(k,:)= yy; 
end 
让 7 于: 
f{(1:4) = feval(funfcn, X(1:4),Y(1:4)); 
fork=4:n 
f(k) = feval(funfcn, X(k),Y(k)):;: 
xX(k+1)= Xx(1)+hxk; 
Y(k+1)=Y(k) + (h/24) x ((f(k—3:k))})'x*x[-937 -59 55]'); 
王 ( 攻 十 11) = feval(funfcn,X(k+i+1),Y(kE+1)})); 
f(k} = £f(k+i+1)}); 
k=k+i+1]1; 
end 
fork=2:n+1 
wucha(k}) = norm(Y(k)} — Y(k—1)}); k=k+i+1; 
end 
X= X(l1:n+1).; 
T= YLnT 1 
n= :n+t+1, 
wucha = wucha(l:n,:).; 
P= |[n',X,Y,wacha' | : 


【 例 11-153〗 利用 四 阶 亚当 斯 显 式 公 式 求 初 值 问题 : 


rdy 2 
全 1 一 1 0< 二 入 


的 几 个 点 的 数值 解 ,h= 二 1/15 ,并 计算 它 与 精确 解 y= 二 [gw | a )/0 FF 的 误差 ,在 同一 
图 形 窗 口 画 出 精确 解 和 数值 解 的 图 形 。 

编 与 该 初 值 问 题 困 效 程序 如 下 : 

function 了 = funfcn(x, vy) 


YY 二 XT Yr 
end 


编写 积分 银 数 程 厅 如 下 : 


function y= fun(x) 
x-1Teapl— a) 
end 


编写 主 调用 程 厅 如 下 : 


clc,clear,close all 
T= dsolve( 'Dy=1— (2x x Vv)/(l1+x"*2)','x') 
x0 = 0.; 


b=2. 
YO0= 0; 
h= 1/15. 
[k, X,Y, wucha,P] = AMams4x((@ funfcn, x0,b, vy0,h), 
y=— (XI/AIWX "AL TE "2); 
b31 = 0; 
bA4l = 0; 
bA2 = 0; 
b43 = 1; 
cl = 1/6;. 
c2 = 2/6; 
c3= 2/6; 
c4= 1/6; 
a2 = 1/2. 
a = 1/2; a c=1; 
b21 = 1/2; b32 = 1/2; 
C= [cl1,c2,c3, cd,a2, a3, ad,b21,b31,b32,b41, b42,b43]; 
[k, X,Y1, fxy,wch, wucha, P|] = RKA( (@ funfcn, (@ fun, x0, b, C, Yo hb) 
plot(X, Y, 'gh—— ',X,Y1, mp—— ',X,y,'bo—— '), 
grid, 
xlabel(' 自 变量 X')， 
Ylabel(' 因 变量 Y') 
legend(' 用 四 阶 亚当 斯 显 式 公式 计算 的 数值 解 ', ' 用 四 阶 龙 格 一 库 塔 公 式 计算 的 数值 解 ', ' 精 确 解 y 
= (x+1/3x*3)/(1+x*2)') 
wohY = abs(y— Y), 
WwWChyYl = abs(y— Yl1), 
m= zeros(1,k), 
forn=1:k, 
m{(l,n)=n-—1, 
end, 
[m’', KX, vy,Y,Y1 ,wchyY,wchY1 |, 


运行 程序 ,输出 图 形 如 图 11-16 所 示 。 


| | | | | | I | 
一 * 一 用 四 阶 亚当 斯 显 式 公 式 计 算 的 数值 解 | 
一 一 用 四 阶 龙 格 一 库 塔 公式 计算 的 数值 解 -Fr--- 
一 2 一 精确 解 ?=(Cx+13r MI+C) 


因 变量 


0 02 04 06 08 10 12 14 16 18 2.0 
自 变量 


图 11-16 亚当 斯 法 求解 图 
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11.4.2 亚当 斯 内 推 公式 


we 秆 四 个 插值 扩 点 (x ye ) oN sai ) 要 ( Tan—2 » fn—2 ) (Tn—3 fa ) 作 二 次 岳 值 多 项 
式 $3 (XT) ,误差 为 R(x)。 
略 去 相应 的 误差 有 


yrn = yn 二 C9fs + 19fr1— 5fest fes) 


局 部 截断 误差 为 


Rs pe oh" YC€) 


该 公式 即 为 第 用 的 四 阶 亚当 斯 内 推 公 式 , 显 然 ,该 公式 为 隐 式 公式 。 

在 MATLAB 中 编程 实现 的 四 阶 亚当 斯 隐 式 公式 求 效 值 解 的 函数 为 Adams4y() 。 
功能 : 用 四 阶 亚 当 斯 隐 式 公式 求 数值 解 。 

调用 格式 : 


[k, X,Y, wucha, P| = Adams4y(x0,b,v0,h) 


其 中 ,zxo 为 初 值 ; 5 为 x 右 病 上 把; yo 为 初 值 ; hh 为 近代 步 长 ; P 包括 有 ,X,Y ,wucha 
数值 。 
用 亚当 斯 法 隐 式 算法 求解 程序 如 下 : 


function [k, X,Y,wucha,Pl] = AMdams4y(x0,b, vO, h) 


竺 bb 为 匡 吉 端点 


村 hh 为 多 代步 长 
秆 忆 和 包括 k, X,Y,wucha 数值 
X= XO ; 
Y= y0; 
p= 128; 
n= fix((b— x0)/h); 
if ns5, 
return, 
end:; 
X= zeros(p,1); 
Y= zeros(p, length(v)); 
f= zeros(p,1); 
长 = 工 ; 
X(kK) = xXx; 
WE 1 = 
fork=2:3 
DZ 
下 用 二 到 十 hi 2 
X33 = XX+ h;kl = x— y; 
yl = y+i+hx kl/2; 
= XTh; 
长 之 = x1 — vil; 


v2=w1+hxk2/2: 
k3= x2 — Y2; 
vy3= y+h k3; 
EKAd= XxX3— 了 3 
y=Y+hx (kl+2x*k2+2*k3+k4)/6; 
xX(k) = x; 
Ylk,:)= vy; 
k=KkK+i1; 
end 
X,Y, 
for k= 3:n 
X(k+i+1)= XxX(1)})+hxk; 
Y(k+i+1)= (1/24.9) * (0.24xk+i+0.12+ (Y(k— 2:k)})'x*[-0.10.5 22.1]'), 
k=k+i+1, 
end 
fior k=2:n1+1 
wucha(k) = norm(Y(k)— Y(k—1)); 
end 
X= All:n+1); 
T= Tlnt 1,:); 
下 二 了 :了 十 工 ， 
wucha = wuchal(1:n，:) ; 
P= |[n',X,Y, wacha' |; 


【 例 11-16 利用 常用 的 四 阶 龙 格 - 库 塔 公 式 求 初 值 问 题 : 


的 几 个 点 的 数值 解 , 再 利用 四 阶 亚当 斯 隐 式 公式 求解 党 微分 方程 初 值 问 题 ,hh 二 1/10, 并 
计算 它 与 精确 解 y 二 + 一 1 十 e “的 误差 ,在 同一 图 形 窗 口 画 出 精确 解 和 数值 解 的 图 形 . 
编写 该 初 值 问题 吨 数 程序 如 下 : 


function y= funfcn(x,yvy) 
"ee 
end 


编写 积分 银 数 程 厅 如 下 : 


function y= fun(x) 
y=x-1+exp(— x); 
end 


编写 主 调 用 程 厅 如 下 : 


clc,clear,close all 
x0 = 0.; 

b=1.; 

YU = 0; 

hi= 1/10; 


Ca 


Ih 
Ll 
L 
i 
上 
IF = 
口 
Wo 


-MATLAB 科 学 计算 


[k, X,Y,wucha,Pl] = Adams4y (x0,b, v0,h) 
TX—1+exp(— X); 
b31 = 0; 
bAl = 0; 
bA42 = 0; 
bd43=1:; 
cl= 1/6; 
c2 = 2/6; 
c3 = 2/6; 
cA= 1/6: 
a2 = 1/2.; 
a3 = 1/2; 
ad=1; 
b21 = 1/2; 
b32 = 1/2; 
C= [el,c2,c3, C4,a2, a3, ad,b21,b31,b32,b41,bA42,b43]; 
[k, X,Y1, fxy,wcoh, wucha, Pl] = RKA( (@ funfcn, (@fun, x0, b,C, v0,h) 
plot(X, Y, 'gh—— ',X,Y1, mp—— ',X,y,'bo—— 小， 
grid 
xlabel(' 自 变量 X')， 
Vlabel(' 因 变量 Y') 
legend(' 用 四 阶 亚 当 斯 隐 式 公式 计算 的 数值 解 ', ' 用 常用 的 四 阶 龙 格 一 库 塔 公式 计算 的 数值 解 '， 
精确 解 Y= x 1+exp( 一 x)') 
wohY = abs(y— YY), 
wchyYl = abs(Yy 一 YL)， 
m= zeros(1,k), 
forn=1:k 
m(l,n)}=n-—-1 
end 
[m', Xv YY ,wohyY, wohY1 |], 


运行 程序 ,输出 图 形 如 图 11-17 所 示 。 


一 * 一 用 四 阶 亚当 斯 隐 趟 公式 计 
-- 一 用 常用 的 四 阶 龙 格 一 库 塔 公 
一 e 一 精确 解 y=x-1+exp(-x) 


算 的 数值 解 。 |! 甩 
\ 式 计算 的 数值 用 一 


0.5 
目 变 量 X 


\ 图 11-17 亚当 斯 隐 式 法 求解 图 


11.4.3 亚当 斯 校正 公式 


亚当 斯 内 推 公式 为 隐 式 公式 ,计算 时 常常 需要 进行 办 代 法 求解 ,实际 应 用 时 , 先 用 亚 
当 斯 外 推 公式 进行 预报 操作 ,再 用 亚当 斯 内 推 公式 进行 校正 操作 , 即 


yr = yn tt 755fn — 59 ft 37 fu 一 9 万 -) 


A 


| — Vn | FA C9f Cxnt » Vi ) | 19 5 fel F fnz) 


其 中 ,kk 二 0,1,2,…。 上 式 称 为 四 阶 亚当 斯 预报 校正 公式 。 

在 MATLAB 中 编程 实现 的 改进 的 亚当 斯 法 求 数 值 解 的 函数 为 Adams4y10. 

功能 : 用 改进 的 亚当 斯 法 求 数 值 解 。 

调用 格 陈 : 

[k, X,Y, wucha,Pl] = AMams4yl (funfcn, x0, b, vy0,h) 

其 中 ,funfcn 为 待 求解 函数 ; xo 为 初 值 ; 5 为 zz 布 端 点 ; yo 为 初 值 ; h 为 迭代 步 长 ; 
P 包括 上 ,下 ,YY,wucha 数值 。 

用 改进 的 亚当 斯 法 算法 求解 程 订 如 下 : 


function [k, X,Y,wucha,P] = AMams4dyl (funfcn, x0,b, v0,h) 
革 Eunfcn 为 待 求解 函数 


竺 XO0 为 初 值 
竺 bb 为 到 右 端 点 


针 h 为 沈 代 步 长 

秆 忆 和 包括 k, X,Y,wucha 数值 

x= x0;y= y0; 

p= L289. 

n= fix((b— x0)/h); 

1f n< 5, 
Ieturn, 

enmd ; 

X= zeros(p,1): 

Y= zeros(p, length(v)):; 

f= zeros(p,1); 

诺 三 工 :; 

WI x TE 

fork=2:4 
cl=1/6;c2= 2/6; 
c3= 2/6;cd = 1/6; 
a2 = 172; 
a3= 1/2. d= 1 
B20 1/2 .0a 0 
b32 = 1/2:; 
b41 = 0;b42 = 0; 
bA43=1; 
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Xl1] = XxX+azxh; 
X22 = Xadxh; 
X33 = X+ adxh; 
kl1 = feval(funfcn, x, ¥):; 
X= 多 Th; 
Yl1] = y+b2l] * hx kl:;: 
k2 = feval(funfcn, xl1, yl); 
YZ2= y+b3l x hx kli+b32x hx k2; 
k3 = feval(funfcn, x2, vy2); 
yYy3= y+bAl x hx kl + bA2 x hx k2+ bl3 x hx k3; 
k4 = feval(funfcn, x3, vy3); 
v=y+hx (cl kli+c2x k2+c3xk3+ cd x kA4); 
X(k)= x; 
WU 
k= 二 +1]1; 
end 
A 
Sf(1:4) = feval(funfcn,X(1:4), Y(1:4)); 
fork=4:n 
xX(k+1)= XxX(1)+hxk; 
f{(k+i+1)= feval(funfcn,X(k), Y(kK)); 
Y(kK+1) = Y(kK)+ (h/24) ¥* ((f(kK—2:k+1))'*[1 -5199]'); 
王 (长 十 1) = feval(funfecn,X(kK+i+ 1)}),Y(k+i+1))}); 
f(k} = f(k+i+1); k=k+i+1; 
end 
for k=2:n+1 
wucha(k) = norm(Y(k) — Y(k— 1)); 
end 
X= X(1:n+i+1): 
Y= Tl:nt1i,.:): 
n= :nt+1, 
wucha = wucha(1:n,:}); 
P= |[n',X,Y,wacha']; 


【 例 11-17】 用 改进 的 亚当 斯 方法 和 常用 的 四 阶 龙 格 一 库 塔 公式 求 下 列 函 数 ; 
[| 空 =z 一 yy QT 起 .1 
We 一 
中 初 值 问题 的 数值 解 及 其 与 精确 解 y 二 z+ 十 1 一 e。 的 误差 ,在 同一 图 形 窗口 画 出 精确 解 和 
数值 解 的 图 形 ， 
编写 该 初 值 问题 图 数 程 序 如 下 : 
function 了 = funfcn(x, vy) 


YY XT YY’ 
end 


编写 积分 图 数 程 序 如 下 : 


function y= fun(x) 
Y= XxX-—1+exp(— x); 
end 


编写 主 调用 程 订 如下: 


clc,clear,close all 
x0 = 0.; 
b=1; 
y0= 0; 
h=1/10; 
[k, X,Y, wucha,Pl] = AMams4vy] ((®@ funfcn, x0,b, vy0,h), 
y=X-1+exp( — X); 
b31 = 0; 
bAl = 0; 
bA2= 0; 
b43=1; 
EU/AG6- 
c2 = 2/6; 
c3= 2/6; 
c4= 1/6; 
= 
a3 = 1/2.; 
ad=1; 
B21—172- 
b32 = 1/2; 
C= [el,c2,c3, cd4,a2, a3, a4d,b21,b31,b32,b41, b42.,b43|]; 
[k, X,Y1, fxy,wch, wucha, P|] = RKA( (Wfunfcn, (Wfun, x0, b, C, yO,h) 
plotlX, Y, gh — X,Y, mp —— ,X,Y TO—— "), 
grid, xlabel(' 自 变量 X'),，ylabel(' 因 变量 Y') 
legend(' 用 改进 的 亚当 斯 方法 计算 的 数值 解 ', ' 四 阶 龙 格 - 库 塔 公式 计算 的 数值 解 ', ' 精 确 解 y= x 
-1+exp( — x)') 
wohY¥ = abs(y— Y), 
wohY] = abs(y 一 YL)， 
m= zeros(1,k), 
forn=1:k, 
m(l,n)=n, 
end, 
[m', KX, vy, YY ,weohY, wchyYl]， 


运行 程序 ,输出 图 形 如 图 11-18 所 示 。 
【 例 11-183 利用 单 环 节 的 亚当 斯 预测 一 校正 公式 、 四 阶 亚当 斯 显 式 公式 、 四 阶 亚 当 


斯 隐 式 公式 求解 常 微分 方程 初 值 问题 ,3 二 1 一 ,yy|z-o 一 0,0 志 + 志 20,h 二 1/5, 计 算 


1 二 Tx? 
它 与 精确 解 y 一 (x 十 地 z)/(1 十 x?) 的 误差 ,在 同一 图 形 窗口 而 出 精确 解 和 数值 解 的 
图 形 。 
编写 该 初 值 问题 函数 程序 如 下 : 


function y= funfcn(x,vy) 
y= 1— (2. x x. x yy)./(l+x.*2); 


end 


EF 


一 9 一 用 改进 的 亚当 斯 方法 计算 的 数值 解 ， 
-一 一 安 一 四 阶 龙 格 一 库 塔 公 式 计算 的 数值 解 ' 
一 一 情 确 和 解 y=x-1+exp(-x) 


一 一 一 太一 一 一 十 一 一 一 也 一 一 一 二 一 一 一 一 


因 变 量 F 


0 0.1 02 03 04 05 06 0.7 
目 变 量 蕊 


图 11-18 改进 的 亚当 斯 法 
编写 积分 随 数 程序 如 下 : 


function y= fun(x) 
Y= (xt+ 1/3. * x. 3)./(1l+x.*2); 
end 


亚当 斯 预测 一 校正 公式 编程 如 下 : 


function [k, X,Y,wucha,Pl| = AMamsA4yl (funfcen, x0,b,vy0,h) 
和 = x0;y= y0; 
p= 128; 
n= fix((b— x0})/h): 
if n= 5, 
return, 
end:; 
X= zeros(p,1); 
Y= zeros(p, length(vy)); 
f= zeros(p,1); 


El 
X(k) = Xx; 
Tlk,:) = "i 
fork=2:4 


cl =1/6;c2= 2/6;c3 = 2/6; 

caA= 1/6;a2= 1/2; a3= 1/2: 

a =1:b21=1/2;bal = 0;ba2=—1/2; 
b4l1] = 0;b42 = 0;b43= 1; 

其] = x+az2xh; x2= xX+a3xh; 

X33 = XX+ adx*x h; 

kl = feval(funfcn, x, y); 

Yl =YyY+b21 x hx kl; 


天 一 区 十 是， 
k2 = feval(funfcn, xl1, yl); 
V2=y+b3l x hx kli bx hx ko; 
k3 = feval(funfcn, x2, vy2); 
Y3=¥+bA4l x hx kl i+ bA2 x hx k2+ bA3 x% hx k3; 
k4= feval(funfcn, x3, v3); 
y= y+hx (clxklic2xk2+c3x k3+cd4x kd); 
X(k)= x; 
Y(k,:)=y; 

end 

i 

f= feval(funfcn,X(1 :4),Y(1:4)); 

二" 

fork=4:n 
X(k+i+1)= X(1)+hx k;f(k) = feval(funfcn,X(k), YY(k))}):; 
P= Y(k)+ (h/24) x ((f(k— 3:k))}x[-337 -59 55]'); 
f= [£f(2) £f(3) f(4) feval(funfcn,X(k+i+1),P}], 
Y(kK+1)= Yk)+ (h/24)}* (fx[1 519 393]'):; 
天 (4) = feval(funfcn,X(k+ti+ 1),Y(k+i+ 1)})):k=k+i+1:;: 

end 

fork=1:n 
wucha(k+1) = norm(Y(k+1)— Y(k)): 

end 

X= X(l1:nti+1).; 

Y= Yl:nt+1,:); 

n= :nit1, 

wucha = wucha(1:n,:}).; 

P= [mm XIY wuacha' ] ; 


主 程序 如 下 : 


clc,clear,close all 


h=1/5; 

subplot(3,1,1) 

[k, X, Yl1,wuchal ,Pl|] = Adams4y]l ((@funfcn, x0,b, yo,h) 

y= (KX+1/3x X.*3)./(1+ XxX. "2); 

plot(X, Yl, mh—— ',X,y, 'bo—— '), 

grid 

legend(' 用 单 环节 的 亚当 斯 预测 一 校正 公式 计算 的 数值 解 ', ' 精 确 解 Y= (x+1/3x^3)/(1+x^2)') 
wchl = abs(y— Yl1), 

[Pl,y, wehll] 

title('dy/dx =1- (2xy)/(1+x^2),y(0) =0 在 [0,2] 上 的 数值 解 和 精确 解 的 图 形 ') 


subplot(3,1 ,2) 
[k, X,Y2, wucha2,P2] = Aams4x( (@ funfcn, x0, b, y0, h) 
y= (KX+1/3x X.*3)./(1+ XX."*2); 


CA 


CA 
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plot(X, Y2, 'mh—— ',X,y, bo 一 一 小， 

| grid 

legend(' 用 四 阶 亚当 斯 显 式 公 式 计算 的 数值 解 '，' 精 确 解 y= (x+1/3x^3)/(1+x^2)') 
woh2 = abs(Yy 一 Y2)， 

， [P2, vy, wch2 | 


subplaott3,1,3) 

， [k, X,Y, wacha,P] = adamsdl( Euntcn x0,b,y0,h),y= (X+1/3x% X.*3)./(1+X.*2); 
plot(X,Y, ‘mh—— ',X,y,'bo—— '), 

grid, 

xlabel(' 自 变量 X'),ylabel(' 因 变量 Y') 

legend(' 用 四 阶 亚当 斯 隐 式 公式 计算 的 数值 解 ', ' 精 确 解 y= (x+1/3x^3)/(1+x^2)') 
woch = abs(vy— Y),[P,vy,wch],A= [X,v,Yl,Y2,Y,wchl ,wch2 ,wchl 


| 运行 程序 ,输出 结果 如 图 11-19 所 示 。 
dy/dx=1-(2xyY(1+x”), y(0)=0 在 [0, 2] 上 入 精 入 由 


一 * 一 用 单 环节 的 亚当 斯 预测 -校正 公式 计算 的 数值 解 
一 e 一 精确 解 y=Gx+1/3x3M(1+xe) 


0 0.2 0.4 0.6 0.8 1.0 1 .2 1.4 1.6 1.8 2.0 


| AP 一 s 一 用 四 阶 亚当 斯 显 式 公 式 计算 的 数值 解 
一 一 精确 解 y=(x+1/3x3W(1+x) 


/ | | 一 一 用 四 阶 亚当 斯 隐 式 公式 计算 的 数值 解 
ee | 一 一 精确 解 y=(x+1/33M+te) 


0 02 04 06 0.8 1.0 1.2 [4 1.6 1.8 2.0 
自 变 量 六 


| 图 11-19 亚当 斯 预测 一 校正 求解 对 照 图 


11.4.4 汉 明 法 


汉 明 (Hamming) 法 是 万 一 种 形式 的 多 步 预 佑 一 校正 法 ,其 截断 误差 也 是 oCP ) 。 下 
面 对 其 进行 具体 介绍 。 


1. 基本 原理 


汉 明 预 售 一 校正 公式 为 


pan = ys 十 和 (2 二 


1 12 
mntl 一 prtl 4+ ol Cn — pr) 


1 | a 
Cntl 二 SLY 一 Ya | 3 于 二 | a fa | (Tati 7HLeHl 2 ) | 


Vatl 一 Catl ~ ToT Cnt pnt1) 


2. 算法 程序 实现 


在 MATLAB 中 编程 实现 的 汉 明 公式 求 数值 解 的 函数 为 Hamming()。 
功能 : 用 汉 明 公式 求 数 值 解 。 
调用 格式 : 


[k, X,Y,wucha,P| = Hamming(funfcn, x0, b, Yo, hy) 


其 中 .funfcn 为 待 求解 图 数 ; zo 为 初 值 ; 2 为 工 右 端点 ; yo 为 初 值 ; hh 为 迭代 步 长 ; 
PP 包括 上 有 有, 针 ,Y ,wucha 数值 。 


汉 明 公式 编程 如 下 : 


function [k,X,Y,wucha,P| = Hamming(funfcn, x0,b,v0,h) 
竺 funfcn 为 待 求 解 函 数 


先 b 为 克 吉 端点 


多 h 为 千代 步 长 

第 PP 包括 k, X,Y,wucha 数值 

x= x0;y= yO; 

p= 128; 

n= fix((b— x0)/h); 

TE 可 之 与 
Ieturn, 

end:; 

X= zeros(p,1); 

Y= zeros(p, length(v)):; 

f= zeros(p,1); 

k=1; X(k) = x; Y(k, :) = ¥"; 

fork=2z:4 
ee 
c3= 2/6;c4= 1/6; 
a2=1/2; a3= 1/2; 
ad=1:b21=1/2;b31=0; 
b32= 1/2; hbAl = 0:; 
b42 = 0;b43 = 1; 
Xl1] =X+ azxh.; 
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XZ 二 Xi+adxxh; 
X33= XX+ adx*h; 
kl1 = feval(funfcn, x, y); 
yl y+balx hx kl; 
k2 = feval(funfcecn, xlL yl1):; 
2= y+hlx nx kl+i+D2x hx kk2. 
k3 = feval(funfcn, x2, vy2); 
yYy3=YyY+bAl x hx kl + bhbA2x% hx k2+ bA3x hx k3; 
k4 = feval(funfcn, x3, vy3); 
Y= y+hx (cl x kli+c2x k2+c3x% k3+ cd x kA4); 
X(k) = x; 
Ylk,.:)= YY; 
长 三 长 十 】:; 
end 
区 
天 (1:4) = feval(funfen,X(1:4),Y(1:4)); 
fork= 4:n 
f(k) = feval(funfcn, X(k),Y(k)); 
X(kEK+1)=X(1)+hxk; 
Y(k+1)= (1/8) x (9 x Y(k) —Y(k—2)) + (3x h/a8) x ((f(k—2:k))'*[-121]'); 
f(k+i+1)= feval(funfcn, X(k+1),Y(k+1)); 
flk) = £f(k+i+1); 
k= 二 KT1-: 
end 
fork=22:n+1 
wucha(k) = norm(Y(k)— Y(k— 1)); 
end 
X= X(1:n+1); 
kh = 
n=1:nt+1, 
wucha = wucha(l:n, :); 
P= |[n',X,Y,wucha' |; 


【 例 11-19】 利用 汉 明 公式 求 初 值 问 题 


dy pe 四 
yl 0 


的 几 个 点 的 数值 解 ,h= 二 1/2, 并 计算 它 与 精确 解 v 一 (> | Sz )/a Fz ) 的 误差 ,在 同 
图 形 窗口 画 出 精确 解 和 数值 解 的 图 形 ， 
编写 该 初 值 问题 图 数 程序 如 下 : 


Eunction y= funfcn(x,y) 
y= 1 一 (2. x xXx. x y)./(l1+x."*2); 
end 


编写 积分 图 数 程 序 如 下 : 


function y= fun(x) 
v— Izv "I lr "2. 
end 


相应 的 主 程序 如 下 : 


Clc,clear,close all 

x0=0;b= 20.;. 

yO0= 0; 

下 二 本 人。 

[k, X,Yh, wucha, Pl] = Hamming((@funfcn, x0, b,v0,h) 
0 

[k, X,Y, wucha,P| = Milne( (® funfcn, x0, b,y0,h) 

[k, X,Y1,wucha,Pl] = AMams4yl((@funfcn, x0,b, vo, h), 

cl= 1/6;c2= 2/6: 

b31 =0; b4l =0;bA42=0;b43=1; 

c3= 2/6;c4=1/6; 

= 

b21 = 1/2; b32 = 1/2; 

C= [cl,c2,c3, cd,a2, a3, ad,b21,b3]1,b32,b41,b42,b43|]; 
[k, X,Y2, fxy, woh, wucha, P|] = RKA( (@ funfcen, (Wfun, x0, b,C, vo,h) 
plot(X, Yh, bh—— ,X,Y, mx —— ,X,Y1l, gp-—— ,X,Y2, ro-— ,X,Yy,'k-—— '), 
grid 

xlabel(' 自 变量 X')，Ylabel(' 因 变量 Y') 

wohY = abs(y 一 Y) ， 

WwWChyYh = abs(y 一 Yh)， 

WwWCchyYl = abs(vy— Yl1), 

WwWChyY2 = abs(y 一 Y2)， 


m= zeros(1,k), 


end, 
[m', XK, vy Yh, Y, Y1, Y2, wohYh, wohy, woehYl, wohY2 | ， 


运行 程序 ,输出 图 形 如 图 11-20 所 示 。 


因 变 量 了 


0 2 | 全 8 10 12 1 寺 I 18 20 
目 变 量 飞 


图 11-20 对比 求解 图 
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11.5 一 阶 微分 万 程 (组 ) 的 数值 解 计算 


-了 第 微分 方程 组 的 初 值 问题 : 


[dys i : A ee 
| i -一 Fels YE » Vz (TX), » Ym (A ) 由 Ch uk 和 
| V(X0) 一 Wo 


具体 形式 为 


| 一 一 三 攻克 1 VEz ) 4 91 (To 一 YI10 


- 二 fz2z(X, Yl » Vz) » V2 (To 一 .20 


MATLAB 工具 箱 提 供 odel5s 函数 供 调用 ,其 格式 如 下 : 

[TOUT,YOUT] = odel5s(ODEFUN ,TSPAN ,Y0) 

其 中 ,ODEFUN 为 相应 的 函数 ; TSPAN 为 相应 的 积分 时 间 区 间 ; Y0 为 积分 初始 
条 件 。 

【 例 11-20〗 求 微分 方程 组 : 


1 六 2 

Fr 
下 一 袜 3 

7 = 一 站 ”一 中 1 1 
(zs = x zs — 3x zo 27 zl] 十 9zssin 


在 区 间 五 一 | 0. 1 :60 | 上 满足 条 件 Z 一 0. 1 时 ,= 一 1,zz 一 1,zs 一 1 的 特 解 。 
建立 方程 组 的 因数 文件 如 下 : 


function dz = dzdxl1 (x,z) 

dz(1)= z(2); 

dz(2) = z(3); 

dz(3)} = z(3) x"*(—1)—3xx’*(—2})} x*z(2)+2xX^(— 3)xz(1)+9x x’*3x sin(x):; 
dz= [dz(1);dz(2) ;dz(3)]; 


end 


编写 主 程序 如 下 : 


clc,clear,close all 

H= [0.1,60]; 

zDD=|11:1:11: 

[x,z|] = odelS5s('dzdxl1',H, z0):; 

plot(x, z(:,1),'g—— ',x,z(:,2), bx —— ',x,z(:,3), mp—— ') 
xlabel(' 轴 \it x'); 

Ylabel(' 轴 \it y') 

grid on 


legend(' 方 程 解 zl 的 曲线 ',' 方 程 解 z2 的 曲线 '，' 方 程 解 z3 的 曲线 ') 


运行 程序 ,输出 结果 如 图 11-21 所 示 。 


X 10° 


| | 
方程 解 z1 的 曲线 
| 一 一 方程 解 22 的 曲线 


图 11-21 数值 结果 图 


【 例 11-21】 用 常用 的 四 阶 龙 格 一 库 培 公式 求解 下 列 和 党 微分 方程 组 的 初 值 问题 的 数 


[zs = XT 3 — 3T zo 27 “zi 9x’ sinz 
其 中 ,hh 一 0. 25 , 画 出 数值 解 的 图 形 。 
建立 方程 组 的 明 数 文件 如 下 : 


function dY= dydx(X,Y) 

dr(1) = Y(2); 

dY(2) = Y(3); 

dY(3) =Y(3)} x X*^(—1)—-3xX°*(—2) xY(2)+2xX*(—3)xY(1)+9xX^3x sin(X):; 
d¥= [dyY(1);dY(2) ;dy(3) |]; 

end 


编写 四 阶 龙 格 一 库 塔 公 式 程序 如 下 : 


function [k, X,Y,wucha,P|] = RRAz(dvdx,a, b,cCcT,h) 
n= fix((b— a)/h); 
X= zeros(n+1,1); 
Y= zeros(n+ 1,length(CT)):; 
=a:h:b; 
Yl = CL" 
fork=1:n 
kl = feval(dydx, X(k), YY(k, :)) 
x2 = XIkEYTh2:v2= YIk, :Tk hy/2; 
k2 = feval(dvydx, x2, y2): 


并 所 溯 寻 水 


-~ 给 知 (路) 


pi | 
3/9 转 
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k3 = feval(dvydx, x2,Y(k, :)'+k2* h/2); 

k4 = feval(dydx, X(k) + h,Y(k,:)'+k3x h); 

Yik+1,:)= Yk,:) +hx (kl "+2 k2'+2% k3'+ kd4')/6: 
k=k+i+1; 

end 

fork=2:n+1 

wucha(k) = norm(Y(k)— Y(k—1)):; 

k=k+1; 


end 
| =m nl 1 v= nl 
| KEK=1:nt1; 

| wucha = wucha(l:k, :); 

\ P= [k',X',Y,wucha']; 


相应 的 主 程 厅 如 下 : 


CcT= [1;1;1]; 
n= 0.25; 
/ [k, X,Y, wucha, P] = RKA4z( (@ dvydx, 0. 1,60, CT, h), 
| plot(X, Y(:,1),g—— ,X,Y(:,2), bx —— ,X,Y(:,3), mp—— ') 
xlabel( ' 轴 \it x'); 
ylabel(' 轴 \it y') 


clc,clear,close all 


grid on 


legend( ' 方 程 解 zl 的 曲线 ', ' 方 程 解 z2 的 曲线 '，' 方 程 解 z23 的 曲线 ') 


运行 程序 ,输出 结果 如 图 11-22 所 示 。 


x 106 


| | 

方程 解 z1 的 曲线 ___ 
一 一 一 一 方程 解 22 的 曲线 
一 太一 方程 解 3 的 曲线 


图 11-22” ”数值 结果 图 


11.6 高 阶 微分 方程 (组 ) 的 数值 解 计算 


高 阶 微分 方程 (组 ) 的 初 值 问 题 可 以 通过 灾 量 代 换 化 为 一 阶 第 微 分 方程 组 初 值 问题 
进行 计算 。 
设 有 和 2 阶 第 微分 方程 初 值 问 题 : 


dxr™ 


(Cryyyy se is y ,0 i < 下 
《7 一 2 3 ,7) 


| y= CR i Vn = 
令 zl 二 yy ,zz 二 zm 二 y”“”, 则 初 值 问 题 就 化 为 一 阶 常 微分 方程 组 : 


’ 
之 m1] 一 之 m 
| 7 | 
a 


MATLAB 提供 ode45 隐 数 供 调 用 ,其 格式 如 下 : 
[t, x] = ode45('xprime', [tO0, tf|], x0, tol, trace) 


说 明 : 

(1) xprime 是 定义 FGz, 归 的 函数 名 。 该 函数 文件 必须 以 过 为 一 个 列 向 量 输出 ,以 
z 为 输入 参量 (注意 输入 变量 之 间 的 关系 , 先 *“ 时 间 变 量 ” 后 “状态 变量 ”) 。 

(2) 输入 参量 t。 和 zj 分 别 是 积分 的 起 始 值 和 终止 值 。 

(3) 输入 参量 ze 为 初始 状态 列 辐 量 。 

(4) tol 控制 解 的 精度 ,可 默认 。 默 认 时 ,默认 tol 二 1. e-6。 

(5) 输入 参量 trace 控制 求解 的 中 间 结 果 是 否 显示 ,可 默认 。 默 认 时 ,默认 为 tol 一 0， 
不 显示 中 辐 结 果 。 

【 例 11-22】 求 微 分 方程 y 一 5(1 一 2y')y 十 7y 二 0 在 区 间 瑟 二 [0, 20] 上 满足 条 件 
Xx 二 0 时 ,y= 二 0,y 二 1 的 特 解 。 
程 化 为 


2. ~ 5(1— 2z1)2, — 72] 
根据 该 方程 建立 相应 的 图 数 文 件 如 下 : 


function dz = dzdx3(x,z) 

dz(1)= z(2); 

dz(2)= Sx (1 2x z(1)"*4) * z(2}—7xz(1); 
dz= [dz(1);:dz(2)]; 


end 


CA 


L 
I 
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编写 主 程序 如 下 : 


clc,clear,close all 

H= [0,20]; 

z0= [0; 1|-; 

[xz = ode45('dzdx3',H, z0):; 

plot(x, zl: 1}), hb —— "xz(: 2) 一 一 

xlabel(' 轴 \it x'); vlabel(' 轴 \it y') 

legend( ' 是 方程 解 Y 的 曲线 '，' 是 解 了 的 一 阶 子 数 ') 


: 运行 后 求 得 解 图 数 y= 二 zi1(t) 和 它 的 导数 y 二 zz (1) 的 图 形 如 图 11-23 所 示 。 
I0 


是 方程 解 ?的 曲线 
是 解 y 的 一 阶 导数 


Wy 


【 例 11-23】 求 微 分 方程 组 : T=—azxiyzyy =—b(y—2z),2 =cy—z—3ry 在 区 
自 先 转化 方程 , 令 一 =1， 2 ,之 一 zy 可 得 


二 
| 过 1 一 风 过 1 -十 Pepe 
z 
zz 一 一 已 (z， | za) 
5 
【zs 一 co CO— Ts — dT1To 


根据 该 方程 建立 相应 的 函数 文件 如 下 : 


function dz = dzdt5( 七 , 工 ) 

a=3; bpb=11;C= 29; 

dz(1) =—- axz(1)+z(2) x z(3); 
人 

dz(3) =cx z(2)— zz(3)— 3x z(2) x z(1); 
dz= [dz(1});dz(2) ;dz(3) |]; 


end 


编写 主 程序 如 下 : 


Clc,clear,close all 

H= [0,751]:; 

z0= [0; 0;10“(— 16)]; 

[t,z|] = odeA45('dzdt5',H, z0) 

plot3(z(:,1), z(:,2), z(:,3),'r—") 

xlabel(' 轴 \it x'); 

ylabel(' 轴 \it y'); zlabel( ' 轴 Ni zz') 

title( ' 空 间 曲 线 是 方程 组 的 解 : z 是 工 和 Y 的 函数 ') 
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运行 后 求 得 解 滁 数 z 一 习 (ty 一 zz (t) ,z 王 zs(t) 的 图 形 如 图 11-24 所 示 。 


至 间 曲 线 十 方程 组 的 解 : 是 z 和 my 的 图 数 


图 11-24 数值 结果 


【 例 11-24】 对 于 单 摆 运 动 求解 过 程 ,. 利 用 牛顿 第 二 定律 即 得 微分 方程 有 
mo” =— me sing 
设 小 球 初 始 偏 离 角 度 为 0,, 旦 无 初速 度 , 则 方程 的 初始 条 件 为 
9(0)=0, 0(0)=0 
求解 上 式 时 ,在 0 不 大 的 条 件 下 ,可 将 方程 中 的 sin6 近似 为 06, 于 是 得 到 线性 第 系数 
微分 方程 : 
sn 


容易 算出 方程 在 初始 条 件 下 的 解 为 


tt) = Oocoswt, w= ,| 和 


由 解 可 知 , 简 谐 运动 的 周期 为 
z [ 
T= 2x,/— 
“Ng 


值得 注意 的 是 , 当 66 较 大 时 :, 仍 用 0 近似 sin0, 误 差 太 大 了 ,因此 单 摆 方 程 没 有 解析 
解 。 试 用 数值 方法 在 % 等 于 10 和 30 两 种 情况 下 求解 ( 设 /一 25cm) , 夯 出 0C) 的 图 形 ， 
并 与 近似 解 作 比较 。 

描述 单 摆 运 动 规律 的 方程 是 2 阶 微分 方程 ,无 解析 解 , 为 了 求 其 数值 解 , 需 先 将 它 化 
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为 方程 组 吕 令 二] —0 ,x2 一 个 " 由 有 


相应 的 初始 条 件 为 
TX1(0) = Xx» Tenh 一 
陈 中 ,gg 一 9.8,/ 一 25.,zrio 为 10 二 0. 1745 弧度 及 30 = 一 0. 5236 弧度 两 种 情况 。 周 期 


ER 
了 一 2 9 8 a ~~10(s).。 


MATLAB 提供 ode23 卫 数 供 调 用 ,其 格式 如 下 : 
[t, x] = ode23('xprime', [tO0, tf], xO0, tol, trace) 


说 明 : 

(1) xprime 是 定义 f(x, 四 的 函数 名 。 该 函数 文件 必须 以 2 为 一 个 列 向 量 输出 ,以 7 
z 为 输入 参量 (注意 输入 变量 之 间 的 关系 , 先 * 时 间 变量 ”后 “状态 变量 ”) 。 

(2) 输入 参量 m 和 分 别 是 积分 的 起 始 值 和 终止 值 。 

(3) 输入 参量 ro 为 初始 状态 列 向 量 ， 

(4) tol 控制 解 的 精度 ,可 默认 。 默 认 时 ,默认 tol 一 1. e-3。 

(5) 输入 参量 trace 控制 求解 的 中 间 结 果 是 否 显示 ,可 默认 ,默认 时 ,默认 为 tol= 0， 
不 显示 中 间 结果 。 

建立 相应 的 函数 文件 如 下 


function xdot = danbai(t, x) 
g= 3.8; 

1 29 

xdot(1) = x(2); 

xdot(2) =— g/l x sin(x(1)); 
xdot = [xdot(1) ;xdot(2})]; 


end 


编写 相应 的 主 程序 如 下 : 


clc,clear,close all 
本 三 由 看 LO | 
al = 0.1745; 
x1l0=[al,,0|]:; 
[t,x1] = ode23(@danbai,H, x10); 
az2 = 0. 5236; 
x20=|azr0ls 
| [t, x2] = ode23(@danbai, H, x20); 
| g=9.8; 
l= 25; 
| w= Sqgrt(g/1); 
| Yl =al x cos(w*t); 
Y2 = a2 x cos(w* t); 
wal = yi{1:153,1) — x1(1:153,1); 


wz 一 T2L1L:153,1) — x2(1:153,1); 

n= :34d- 

先 [n't,xl(1 :34,1),vl,wal,x2(:;,1),Y2,wu2| 

| er eh I ee ee rt i ep ee eh ey 3 
xlabel(' 寺 和 \it t+'):; 

ylabel(' 轴 \it y') 

legend(' 方 程 数值 解 曲线 ,xl0=10 度 ',' 方 程 近似 解 曲 线 , x10 = 10 度 ',' 方 程 数 值 解 曲 线 , x10 = 30 
度 ',' 方 程 近 似 解 曲线 , x10=10 度 ') 
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运行 程序 ,输出 图 形 如 图 11-25 所 示 。 


+ 一 是 方程 数值 解 的 曲线 ，x10=10 度 
是 近似 解 的 曲线 ，x10=10 座 
一 是 方程 数值 解 的 曲线 ，x10=30 讼 
是 近似 解 的 曲线 ，x10=10 度 
/ A 


图 11-25 单 摆 运 动 数 值 计 算 
如 图 11-25 所 示 , 初 始 角 度 为 10 时 近似 解 与 数值 解 绝 对 误差 不 大 ,而 初始 角度 为 30 
时 , 随 着 时 间 的 增加 二 者 绝对 误差 逐渐 增 大 ， 


11.7 边 值 问题 的 数值 解 计 算 


微分 方程 和 定 解 条 件 组 成 定 解 问题 通常 有 两 种 : 一 种 是 给 出 积分 曲线 在 初始 时 刻 的 
性 态 ,这 类 条 件 称 为 初始 条 件 , 对 应 的 定 解 问题 称 为 初 值 问题 ; 另 一 种 是 给 出 积分 曲线 在 
首 未 两 端的 性 态 ,这 类 条 件 称 为 边界 条 件 , 对 应 的 定 解 问题 称 为 边 值 问题 。 如 二 阶 微分 
方程 : 

y 一 riyy)，zEe[a:poyE (— ,oo) 

(1) 第 一 种 边界 条 件 为 

yl(a) =a, y(b)=B 


= 二 三 = 一 二 二 二 三 二 三 三 一 二 


[电量 


MATLAB 科 学 计算 


(2) 第 二 种 边界 条 件 为 
Ya) 一 ay yy(6)=8 
(3) 第 三 种 边界 条 件 为 
y (a) —aoy(a) 一 al， vy (CD) — Boy(b) = A 
其 中 ,ao 宇 0 ,Bo 宇 0 ,ao 十 fr 守 0。 
更 一 般 的 边界 条 件 是 


| 


[ye | ay Ca) 


me 十 easy (a) = ps 
式 中 cisydi;pi(i 二 1,2) 为 症 数 ，。 
在 MATLAB 中 编程 实现 的 线性 打 息 法 求 数 但 解 的 限 数 为 xxdb (〈) 。 
功能 : 用 线性 打 怨 法 求 数 值 解 。 
调用 格式 : 


[k, X,Y,wucha,P| = xxdb(dydxl, dydx2,a, b,alpha, beta, h) 


其 中 ,dydxl 为 目标 方程 1; dydx2 为 目标 方程 2; a 为 x 左 端 点 ; 0 为 工 右 端点 : 
alpha 为 yy 左 闪 点 ; beta | VY 右 病 点 ; h 为 渤 人 代步 长 ; Ee 包括 k s,s,Y ,wucha 数值 。 
编写 相应 的 线性 打靶 法 程序 如 下 ， 


function [k, X,Y,wucha,P|] = xxdb(dydxl ,dydx2,a,b,alpha, beta, h) 
秆 dydxl 为 目标 方程 1 
千 dydx2 为 目标 方程 2 
第 忌 为 到 左 端 点 
人 秆 bb 为 文 右 端 点 
竺 alpha 为 了 Y 左 端点 
竺 beta 为 了 二 端点 
先 h 为 先 代 步 长 
秆 PP 包括 k, X,Y, wucha 数值 
n= fix((b— a)/h):; 
X= zeros(n+i+1,1); 
CT1 = [alpha, 0]; 
Y= zeros(n+ 1,1length(CT]) ); 
YL = zeros(n+1,1lengthl(cT1 )}): 
Y2 = zeros(n+1,length(CTl )):; 
三 忆 :h:b; 
Y1(1,:}= CIl:; 
CI2= [0,11]; 
Y2(1,:}= CT2; 
for k=1:n 
kl = feval(dydxl ,X(k), Yl1(k, :)) 
x2= XK) + h/2;y2= Yk,:})'+kl * h/2; 
k2 = feval(dydx] ,x2, y2); 
k3 = feval(dvydx] ,x2,Y1(k,:)'+k2 关 h/2); 
k4 = feval(dydxl, X(k) + h,Yl(k,:)'+k3x h); 
Yl(k+i+1,:) = Y1(k,:) +hx (kli+2x Ek2'+2 x k3'+ kA4')/6,k=k+i+1: 


end 


u= Yl(:,1) 
fork=1:n 
kl = feval(dydx2,X(k),Y2(k, :)) 
2 = XY + h/2:.v2= T(E,:)’+kl x hb/2; 
k2 = feval(dydx2, x2, y2); 
k3 = feval(dvdx2, x2, Y2(k,:)'+k2 x h/2); 
k4= feval(dvydx2, X(k) + h,Y2(k,:)})'+k3* h); 
Yo 1 = Yk JOSEI 2 R22 WEI" th 三 
end 
Vv 二 Y2(:,1) 
Y=u+i+ (beta—- ulnti+1})) x v/v(n+1) 
for k=2:n+1 
wucha(k)}) = norm(Y(k) —- Y(k 1})); k=k+i+1; 
end 
X= X(l1:n+1).; 
Y= Yl:nt+1,:); 
EK=1:n+i+1].-. 
wucha = wucha(1:k, :): 
P= |[k',X',Y,wucha' |; 
DIoL(X, Y(: ,1), "ro—— "xX, YI(: 1) gx% —— "X,Y2(: ,1), mp——") 
xlabel(' 轴 \it x'); 
ylLabel( ' 轴 itLY') 


Legend( ' 边 值 问 题 的 数值 解 Y(x) 的 曲线 '， 初 值 问题 工 的 数值 解 u(x) 的 曲线 '，' 初 值 问题 2 的 数值 


解 v(x) 的 曲线 ') 
title(' 用 线性 打靶 法 求 线性 边 值 问题 的 数值 解 的 图 形 ') 


【 例 11-2S] 用 线性 打 臣 法 求 线 性 边 值 问题 : 


Fay er Co 


y (zr) -一 y (x) zy (x) cry 下 [0,.6| 


1 十 元? ] 汪 
在 y(0) 王 1.25,y(6) 一 一 1. 25,ci 一 cz 一 2,cs 一 0.8 的 数值 解 ,A 二 0.5, 并 与 精确 解 比较 ， 
画 出 它们 的 图 形 。 


由 目标 方程 得 qi (x) (z) 一 一 et (Cz) 一 0.8,a 一 1.25,8 一 一 1. 25。 
由 此 建立 相应 的 函数 文件 : 


function dY] = dvydx]l (X,Y) 

Cl=2;Cc2 二 2;C3=0.8; 

dyYl1(1) = Y(2); 

dY1(2) = (cl x KX/(1+X*2)) x Y(2) — (c2/(1 +X*2)) x Y(1) + ce3; 
dzl= [drYi(1) ;dyY1(2)]; 

end 


当 cs 二 0, 编写 对 应 的 限 数 文件 如 下 : 


function dY2 = dydx2 (X,Y) 
Cl 二 2:C2a 二 2， 
dy2(1) = Y(2); 


Nn 
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dY2(2) = (cl x X/(1+X*2)) x Y(2) — (c2/(1 +X*2)) * Y(1):; 
dyY2 = [diY2(1);dr2(2)1]; 
end 


clc,clear,close all 

千 精 确 解 

v= dsolve( 'D2y= (2#* X/(1+X*2)) Dy— (2/(1+X*2))x#xvy+0.8"', 'X') 

syms Cl C2, 

X=|[0,6]; 

v= Xx C2+ (1— XX."2) x Cl — A/5% X.*2+B/5 x KX. x atan(X) — 2/5 x log(1 + X.^2) +2/5 x* log(1 
+ X.*2). XN. 2 

[C1,C2] = solve('Cl = 1.25','6 #% C2— 35x% C1l+99211677038297587/2814749767106560 = 一 1.25'); 
SYmS 名 

VY= Xx C2+ (1— XX."2) x Cl — A/5 x X.*2+ 8/5 x X. x atan(X) — 2/5 *% log(1 + X.*2) + 2/5 x*% log(1 
+ X.*2). XK. 2 


运行 程序 ,输出 结果 如 下 : 


Cl2xX— Xx ((4xX)/5 一 (Bx atan(X))/5) + (2x X#* log(X*2 + 1)x (和 一 1/X))/5 + Cl3* 
Xx (X 一 1/X) 

[ Cl, 6x*xC2 - 35#%Cl1 + 1638905643197707/2814749767106560] 

1. 2088219648217098859769672950885 x X 一 (2x1og(X^2 + 1)})/5 + (4x Xx log(X*2 + 1))/5 
人 


主 程序 如 下 : 


clc,clear,close all 
= 
b=6; 
h=0.5; 
alpha= 1.235; 
beta =— 1.25; 
Cl 二 2C2 三 C4 二 0.8; 
[k, X,Y, wucha, P| = xxdb( (Ddydxl, (WD dvydx2 ,a,b,alpha, beta, h), 
hold on 
y= 1.2088219648217098859769672950885 * XX 二 1.25— 2.05 x* X.*2+ 8/5 x X. x atan(X) — 2/5 * 
log(1 + XX."2) +2/5 x% log(l + X."2). x X. "2; 
plot(X, vy,'b—''), hold off 
title( ' 用 线性 打靶 法 求 线性 边 值 问题 的 数值 解 和 精确 解 的 图 形 ') 
n= fix((b— a})/h); 
fork=i:n+i+1l] 
wuchay(k) = norm(vy(k) — Y(k)); k=k+1; 
end 
wuchay; 


pd =: 


E=1:nt+1;: 


wuchay = wuchay(l :k, :); 
Pl= |[k',X',y',Y, wuchay' ,wucha' | 分 
万 

一 -一 : | | | 一 让 
运行 程序 ,输出 图 形 如 图 11-26 所 示 。 全 
用 线性 打靶 法 求 线性 边 值 问题 的 数值 解 和 精确 解 的 图 形 求 

解 


一 2 一 边 值 问题 的 数值 解 扎 xz) 的 图 形 

一 六 一 切 值 问题 1 的 数值 解 ao) 的 图 形 
人 3、 一 一 初 值 问 题 2 的 数值 解 (x) 的 图 形 ， 

Oe z | 边 值 问题 的 精确 解 y(x) 的 曲 形 


图 11-26 数值 解 


11.8 有 限 差 分 方法 


有 限 差 分 方法 是 求 微 分 方程 数值 解 最 弟 用 的 方法 。 有 限 差 分 方法 的 基本 思想 是 : 
先 将 求解 区 域 痢 分 成 很 多 有 限 个 小 区 域 , 得 到 内 布点 的 集合 ; 在 内 节点 上 ,或 用 差 商 代 震 
微 商 ,或 用 数值 积分 的 方法 将 微分 方程 离散 化 ,并 得 到 截断 误差 , 舍 去 截断 误差 ,建立 差 
分 方程 组 ; 然后 结合 定 解 条 件 , 解 差分 方程 ,得 到 数值 解 。 有 限 差 分 方法 适用 于 求 弟 微分 
方程 边 值 问题 的 数值 解 , 用 以 解 弟 微分 方程 初 值 问题 的 数值 解 时 ,有 时 较 困 难 。 

考虑 线性 边 值 问题 Y= 二 qi(zr)y 十 qe (zx)y 十 qa (XT),XTELa.b61,y(a) 二 a,y(5) 二 8B 的 有 
限 差 分 方法 。 


[一 人 2 十 Mga(CzD)) 1—Qe0, 


1 十 四 cr-22j 一 (2 十 ji2g2(zr 2)) 1— YS, 


] + 和 1. — (2 hge (zn 1)) 
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h’* qs (zl ) 一 1 | Dh 


| Vy(TIl ) | 
yl a ) hqa ( ey a, ) 
ya 万 ”gs (Tn_2) 
Ly lx) prgs(re) — |1— SF | 


在 MATLAB 中 编程 实现 的 有 限 元 差分 方法 求 数 值 解 的 图 数 为 yxcf () 。 
功能 : 用 有 限 元 差分 方法 求 数 值 解 。 
调用 格式 : 


[k, A, Bl, X,Y,v,wucha,p] = yxcf(qgql,q2,9q3,a,b,alpha, beta h) 


其 中 ,ql 为 目标 方程 1; q2 为 目标 方程 2; q3 为 目标 方程 3; a 为 工 左 端点 ; 0 为 工 右 端 
; alpha 为 y 左 冰点 ; beta 为 y 布 绩 上 感 ; 为 迭代 步 长 ; p 包括 上 衣 , 针 ,YY ,wucha 数值 。 
建立 相应 的 有 限 元 差分 方法 程序 如 下 : 


function [k,A, Bl,X,Y,v,wucha,p| = vxcf(gl, da2 93 ,ab ,alpha ,beta ,hy) 
竺 ql 为 目标 方程 1 
和 多 q2 为 目标 方程 2 
第 q3 为 目标 方程 3 
第 已 为 斑 左 端点 
竺 Pb 为 瑟 右 端点 
和 alpha 为 y 左 端点 
委 beta 为 y 右 端点 
和 hh 为 兴 代 步 长 
第 pp 和 包括 Kk, X,Y,wucha 数值 
n= fix((b— a)/h); 
X= zeros(n+i+1,1); 
Y= zeros(n+i+1,1):; 
Al = zeros(n,n): 
M2 = zeros(n,n): 
A3 = zeros(n,n): 
A= zeros(n,n); 
= zeros(n,1):; 
fork=1:n 
X=a:h:b:; 
kl(k) = feval(qgql,X(k)):; 
Al{(k+1,k})}=1+hx kl(k)/2: 
k2(k) = feval (gq2, xX(k)):; 
A2(k,kK) =—-2- (hh.*2) x k2(k):; 
A3(k,k+1})}= 1—- hx kl(k)/2; 
kE3(k) = feval(qgq3,X(k)); 
end 
fork=2:n 
B(kE,1) = (h.*2) x k3(k); 
end 
B(1,1) = (h.*2) x k3(1)— (1+hx kl1(1}/2) x alpha:; 
B(n—-1,1)= (h.*2) x k3(n -1)})—- (1+hx kl(n- 1)/2) :xc beta:; 
A=Allli:n-1,i:n-1}+A2(l:n-1,l:n-1)})+h3(l:n-l1,l:n-1): 


Bl=B(ll:n-1,1); 
Y= Hl-T1= YT": 
y= [alpha; Y;betal; 
fork=2:n+1 
wucha(k) = norm(vy(k) 一 T(KE 一 1)); k=k+i+1; 
end 
X=X(1:n+1)， 
T= TlnT1,1): 
E=1] nt]1- 
wucha = wucha(1:k, :).; 
plot(X, y(:,1), mp 一 ) 
xlabel(' 轴 \it x'); 
Ylabel( ' 轴 AitY')， 
legend(' 是 廊 值 问题 的 数值 解 y(Xx) 的 曲线 ') 
title(' 用 有 限 差分 法 求 线性 边 值 问题 的 数值 解 的 图 
p= |[k',X"',yY, wacha' ]; 


【 例 11-26】 用 有 限 差 分 方法 求 边 值 问题 : 


于 rr 3 a OTKT—3 
y (zx) = 1 间 rr ‘(ZX) 4 Fr EY(2 ) 1 i 
比较 。 
7 3 
根据 qi (zz) 一 本部 一 一 一 ,gz(z) 一 1 十 (Tt) je， 


function y= ql(x) 
y= x/(1+x"2); 
end 


function y= 92(x) 
v— /lr 
end 


function y= 93(x) 
y= (6 x— 3)/(1+x"*2); 
end 


主 限 数 程 厅 如 下 : 


clc,clear,close all 
n=6; 

a=0.: 

b=1.; 

alpha=1; 

beta = 之; 

h= (b— a)/n; 


形 ')， 


zzEL[L0,1], yO0)=1, vy(l) = 2, 


的 数值 解 ,将 LO0,1 分 别 平均 分 成 n 二 6 等 份 : 说 明寺 对 数值 解 的 误差 的 影响 ,并 与 精确 解 


一 ,建立 对 应 的 M 函数 文件 如 下 : 


[k, A,B, X,Y,vy,wucha,p|] = yxcf((@ql, (Wgq2, (Wgq3,a,b,alpha, beta, h), 


X=0:hn:1; 
Yl=1+ix."*3, 


pd = 


39 而 
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wu=YL y; 

[KE XYr YL wacha'y waj]， 

hold on 

plot(x, yl, 'bo —— ') 

legend( ' 边 值 问 题 的 数值 解 Y(xz) 的 曲线 '，' 边 值 问题 的 精确 解 Y(x) 的 曲线 ') 
title('n= 6, 用 有 限 差 分 法 求 线 性 边 值 问题 的 数值 解 及 其 精确 和 解 的 图 形 ') 
hold off 


运行 程序 得 到 ?一 6 时 的 计算 结 有 末 和 图 形 如 图 11-27 所 示 。 


n=6, 用 有 限 差分 法 求 线性 边 值 同 题 的 数值 解 及 其 精确 和 解 的 图 形 
2.0 市 


1.9 一 一 边 值 问题 的 数值 解 Mo) 的 曲线 
一 6 一 边 值 问题 的 精确 解 w(x) 的 曲线 


图 11-27 有 限 差 分 法 


11.9 常 微分 方程 (组 ) 边 值 问 题 数 值 解 


MATLAB 软件 提供 了 一 套 求解 一 阶 第 微 分 方程 (组 ) 边 值 问题 数值 解 的 程序 
bvp4c. m, 称 其 为 库 图 数 bvp4c() 。 

图 数 bvp4cO) 可 以 求解 一 阶 第 微分 方程 (组 ) 一 般 的 两 点 边 值 问题 : 

人 = f(xyy),TE [a,b| 
(oCyCa)s ye)) 0 

bvp4c() 产 生 的 数值 解 s(x) 在 la:5] 上 具有 连续 一 阶 守 数 。bvp4c() 利 用 配置 阴 数 
bvpinit() 和 deval() 等 求解 , 即 先 用 网 格 点 将 整个 区 则 La,5j 分 成 硅 二 个子 区 则 ,将 配置 
条 件 施 加 到 所 有 子 区 间 上 ,通过 求解 代数 方程 组 解 出 数值 解 ,然后 在 每 个 子 区 间 上 佑 计 
数值 解 的 误差 。 

如 条 此 解 不 满足 误差 要 求 .: 则 解困 数 调 整 网 格 。 这 梓 用 户 首 对 需 要 用 配置 果 数 
bvpinit() 提供 初始 网 格 上 总 及 在 相应 网 格 点 上 精 硝 解 的 初始 通 近 ,然后 用 果 效 bvp4c() 和 和 
配置 函数 deval() 输 出 数值 解 。 

图 数 bvp4c0O) 还 可 以 求解 包含 未 册 瑚 数 回 量 了 的 一 阶 第 微分 方程 (组 ) 一 般 的 两 点 边 
值 问题 : 


[yw 一 f(r yr) PP),TE la,b| 
lett .0 一 0 
【 例 11-27】〗 求 微分 方程 v 十 |y|= 二 0 在 区 间 [0, 4] 上 满足 边界 条 件 (0) 一 0 和 


y(4) 一 一 2 的 数值 解 ,并 画 出 y 和 y 数值 解 的 图 形 。 


编写 程序 如 下 : 


function vl3 27 

Clc,clear, close all 

solinit = bvpinit([0 123 4],[1 01); 

sol = bvpAc((Wodefun], (@bcfunl, solinit):; 

Xxint = linspace(0,4,35) 

yint = devall( sol, xint) 

plot(xint, vint (1,:3), bho",xint, vint (2,:}) ED 一 一 个) 

区 Label( ' 轴 从 让 x'); 

Ylabel( ' 轴 \it y') 

legend(' 边 值 问 题 的 数值 解 y(x) 的 曲线 ', ' 边 值 问 题 中 y(x) 的 导数 数值 解 的 曲线 ') 
title( ' 用 一 阶 常 微分 方程 组 的 两 点 边 值 问题 求 二 阶 常 微分 方程 数值 解 的 图 形 ') 
end 

function dvydx = odefun]l (x,y) 

dydx = [y(2); — abs(y(1))]; 

end 

function res = bcfunl] (va, vb) 

res= [ya(l)});yb(1) +2]; 

end 


运行 程序 ,输出 图 形 如 图 11-28 所 示 。 


用 一 阶 章 敏 分 方程 组 的 两 点 边 值 问题 求 二 阶 抽 微 分 方程 数值 解 的 图 形 
3 


一 一 边 值 问题 的 数值 解 Xx) 的 曲线 
一 太一 边 值 问题 中 y(x) 的 导数 dx/dx 的 数值 解 的 曲线 


hy 


图 11-28 数值 解 


1 一 一 (4 一 20cOsS2 工 ) yy 


二 上 


并 当 衬 建 等 


-因为 (小 ) 


D 

h 

bh 

LD 
[二 
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在 区 间 [0,xj] 上 满足 边界 条 件 y(0) 一 1,z(0) 一 0 和 >=(r) 一 0 的 数值 解 , 取 9g 一 5;, 并 夯 
' 出 y 和 xz 数值 解 的 图 形 。 
编写 程序 如 下 : 


function yl3 28 

clc,clear,close all 

lamda = 2; 

solinit = bvpinit(0:pi/32:;pi, (@ init2, lamda) 

sol = bvp4c((®odefun2, (®@bcfun2, solinit) 

xint = 0:;pi/32: pi; 

YINT = devall(sol,xint) 

| plot(xint, YINT(1, :), 'bo—— ', xint, YINT(2, :),'rp——') 
| xlabel( ' 轴 证 x'); 

ylabel(' 轴 \it y') 

\ legend( ' 是 方程 组 解 y 的 曲线 ', ' 是 方程 组 解 z 的 曲线 ') 
title(' 用 禽 未 知 和 参数 的 一 阶 常 微分 方程 组 的 两 点 边 值 问题 求 二 阶 常 微分 方程 组 数值 解 的 图 形 ') 
end 

function dydx = odefun2(x,Yy, lamda) 

q= Sidy(1) = y(2);dy(2) =— (lamda— q* 2x% cos(2# x)) * y(1); 
' dydx = [dy(1);dy(2) ]; 

end 

function res = bcfun2( va, yb, lamda) 

res= [ya(l)— 1;ya(2);yb(2)]; 

end 

function vinit = init2(x) 

vinit= [cos(4x x); — 4 sin(4 * x) ]; 

end 


运行 程序 ,输出 图 形 如 图 11-29 所 示 。 


用 会 未 知 参 数 的 一 阶 贡 微分 方程 组 的 两 点 边 值 问题 求 二 阶 闻 微分 方程 组 数值 解 的 图 形 


| 


一 e 一 是 方程 组 解 y 的 曲线 
J 一 二 一 是 方程 组 解 z 的 曲线 


. 


’ 图 11-29 ”方程 解 曲线 


本 章 小 结 


本 和 章 基 于 和 毅 微 分 方程 (组 ) 求 解 , 引 和 人 欧 拉 方程 (二 阶 龙 格 - 库 培 法 .三 阶 龙 格 - 库 塔 法 、 
四 阶 龙 格 - 库 培 法 )、 亚 当 斯 方法 以 及 一 阶 和 局 阶 微分 方程 的 求解 每 。 通 过 理论 和 实例 相 
结合 的 形式 进行 仿 破 ;使 得 对 微分 方程 的 求解 更 具有 和 针对 性 。 


| 

hh 

上 

LD 

人 
人 


MATLAB 中 的 统计 工具 箱 是 一 套 建 立 在 MATLAB 数值 计算 环 
境 下 的 统计 分 析 工 具 , 能 人 够 文 持 范围 广泛 的 统计 计算 人 任务。 概率 统计 
方法 在 金融 工程 学 .宏观 经 济 学 、 生物 医学 .计算 物理 学 (如 粒子 输 运 
计算 、 量 子 热力 学 计算 .空气 动力 学 计算 、 核 工程 ) 等 领域 应 用 广泛 。 

学 习 目 标 : 

。 学习 和 了 解 概率 统计 方法 基本 理论 ; 

。 尝 习 和 千 握 使 用 MATLAB 进行 概率 统计 的 方法 ; 

。 融 练 运用 过 特 卡 罗 算 法 解决 工程 问题 ，。 


MATLAB 中 的 统计 工具 箱 是 一 和 天 建立 在 MATLAB 数值 计算 环 
境 下 的 统计 分 析 工 具 ,能够 支持 范围 广泛 的 统计 计算 任务 。 表 12-1 给 
出 了 MATLAB 支持 的 20 多 种 分 布 以 及 它们 名 称 的 字母 缩写 。 
MATLAB 可 以 识别 这 些 字 母 所 代表 的 分 布 , 并 进行 相应 的 计算 和 

表 12-1 MATLAB 支持 的 分 布 类 型 


分 布 名 称 字母 缩写 分 布 名 称 字 母 缩写 


Beta 分 布 nbin 
二 项 分 布 ncf 
指数 分 布 非 中 心 xX? 分 布 ncx2 
极 值 分 布 正 态 分 布 norm 
FE 分 布 f 或 下 Polss 
7 分布 rayl 
几何 分 证 ; 
广义 极 值 分 布 unif 
三公 由 上 素 托 分 布 SgP unid 
超 几何 分 布 hyge whbl 


对 数 正 态 分 布 


MATLAB 中 求 概 率 蜜 度 有 一 个 通用 的 图 数 pdf() ,通过 此 了 肾 数 可 


以 求 表 12-1 中 所 示 的 23 种 输入 分 布 的 概率 密度 因数 。 此 因数 的 调用 格式 如 下 : 
Y=pdi('name', AA, Al, A2, A3) 

其 中 ,name 为 表 12-1 中 分 布 的 字母 缩写 ; 半 为 样本 答 阵 ; A1、As 和 4s 是 分 布 参 数 
矩阵;Y 为 概 认 密度 和 矩阵。 

对 于 某 些 分 布 ,有 些 瑚 数 窒 阵 可 以 不 必 输 入 。 兰 、A1、As 和 4s 必须 是 具有 同样 大 小 
的 和 矩阵, 当 其 中 输入 之 一 为 标量 时 , 程 厅 会 将 其 调整 为 与 其 他 输入 同 维 的 矩阵 。 

为 外 ,MATLAB 对 于 每 一 种 分 布 还 有 一 个 专用 的 求 其 概率 密度 的 肾 数 。 它 们 的 基 
本 用 法 和 含义 如 表 12-2 所 示 。 

表 12-2 概率 密度 函数 


Beta 分 布 Y =betapd{(X.,A,B) 

二 项 分 布 Y =binopdf( X, N,P) 

X2 分 布 Y =chi2pdf(X, VD) 
Y=copulapdf('Gaussian', U,rho) 

混合 分 布 copulapdf Y =copulapdfC't' ,UU ,rho, Nu) 
Y =copulapdf(Cfamily,U,alphay) 

极 值 分 布 Y =evpdf( X, mu,sigma) 

指数 分 布 Y =exppdf(X ,mu) 

F 分 布 Y =fpdf(X,V1,V2) 

广义 极 值 分 布 Y =gevpdf(X,K ,sigma,mu) 

广 委 由 举 托 分 布 P=gppdf{(X.,K,sigma,theta) 

超 几 何 分 布 Y =hygepdf(X, M,K,N) 

对 数 正 态 分 布 Y =lognpdf{(X,mu,sigma) 

多 项 式 分 布 Y =mnpdf(X, PROPB) 
Y =mvnpdfc(X) 

多 元 正 态 分 布 mvnpdf Y =mvnpdf{(X,mu) 
Y=mvnpdf{(X,mu,;sigma) 

多 元 t 分 布 Y =mvtpdf{(X,C, df) 

负 二 项 分 布 Y =nbinpdf(X, R,P) 

非 中 心 下 分 布 Y =ncfpdf(X,NU1,NU2 ,DELTA) 

非 中 心 t 分布 Y =nctpd{(X,V ,DELTA) 

非 中 心 妇 分 布 Y =ncx2pdf(X,V,DELTA) 

正 态 分 布 Y =normpdf{(X ,mu,sigma) 

泊 松 分 布 poisspdf Y =poisspdf{(X ,LAMBDA) 

离散 均匀 分 布 Y =unidpdf(X,N) 

连续 均匀 分 布 Y =unifpdf(X,A .,B) 

韦伯 分 布 Y =wblpdf(X, A,B) 


上 述 函 数 的 输出 均 为 对 应 分 布 在 X 处 的 概率 密度 。 后 面 的 几 个 输入 参数 是 描述 分 
布 的 参数 矩阵。 需要 注意 的 是 ,输入 参数 的 维 数 必须 相等 ,否则 会 导致 错误 结果 。 


MATLAB 科 学 计算 


12.2 随机 变量 的 一 般 特征 


在 概率 统计 中 ,随机 变量 特征 不 一 ,然而 随机 变量 的 某 些 数 值 能 够 反映 该 概率 统计 
的 一 般 性 特征 ,能 够 为 用 户 提供 一 定 的 参考 依据 。 随 机 变量 的 一 般 性 特征 有 均值 .方差 、 
矩 . 相 关系 数 等 ,MATLAB 统计 工具 箱 自 带 这 些 函数, 能 够 为 用 户 快捷 地 计算 这 些 共 有 
特征 。 


12.2.1 期 望 


设 离 做 性 随机 变量 的 分 布 律 为 
PiX A TE} 3 Pe* R 一 1 ,< 和 
由 相应 XX 的 期 望 为 


De 


EC(X) = > zips 


而 对 于 来 自 总 体 X 的 一 个 样本 , 设 其 样本 值 为 z 一 (ziyzrz， ,Xs), 则 定义 样本 均 
值 为 


Es 

1 

五 一 一 天 
7 


则 zz 依 概率 收 人 鳅 于 X 的 均值 。 

在 MATLAB 统 计 工 具 箱 中 ,提供 了 求解 随机 变量 均值 的 果 数 。 有 具体 的 调用 格式 
如 下 : 

(1) Y 二 mean(X)。 如 果 关 为 一 个 向 量 , 则 表示 求解 该 向 量 的 均值 。 向 量 通 常 为 一 
维 向 量 ,多 维 向 量 有 有 具体 的 调用 格式 。 如 果 站 为 一 个 矩阵 , 则 求解 出 Y 为 矩阵 天 中 每 一 
列 的 均值 ,并 保存 在 Y 数组 中 。 

(2) Y 一 mean(X,， Dim)。 如 果 Dim 二 1, 则 表示 求解 芷 中 第 Dim 列 的 数值 均值 ; 如 
果 Dim 一 2, 则 表示 求解 生 中 第 Dim 行 的 数值 均值 ; 如 果 Dim 一 3, 则 表示 Y= 二 六 。 

【 例 12-1】 对 于 下 列 随机 变量 天 ,求解 其 相应 的 均值 。 

X=[123;336;468;477]; 
提取 该 随机 变量 的 一 行 数据 ,分 析 其 均值 。 编 程 如 下 : 


clc 竺 清 屏 

clear all: 秆 删除 workplace 变量 
close all:; 第 关 挤 显示 图 形 窗 口 
warning off 和 沼 不 显示 警告 

X= [i123-:336:468;477]; 秆 数据 

XI 第 一 行 数据 

Yl1 = mean(Xl) 


运行 程序 ,输出 结果 如 下 : 


芝 国 村 举 半 失 二 太后 二 浅 er ee 攻 


中 

网 

于 

过 . 

洪 妃 

攻 才 

< dt 
-mn s 国 .a . 
: 二 
= 3 = 
过 um s 
py 三 三 ~ = 
过 名 | 龟 氏 本 
旦 习 虽 了 人 呈 
江 噶 < 8 网 过 
从 省 | 
中 中 如 外 | 项 识 站 
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12.2.2 方差、 标准 差 、 征 


方差 是 用 来 刻画 随机 变量 X 取 值 分 散 程度 的 一 个 量 。 其 一 般 用 下 式 表 达 : 
D(X) = E{[zx— E(xr)])} 

在 应 用 上 还 引入 与 随机 变量 X 具有 相同 量 纲 的 量 wD(CX) , 记 为 o(X), 称 为 标准 差 
X 的 & 阶 中 心 矩 应 为 

F{[X—ECX)]}, k= 2,3,. 
可 知 方差 即 为 二 除 中 心 窍 。 
对 于 一 个 样本 来 说 ,样本 方差 通常 分 为 无 偏 估计 和 有 偏 估 计 , 上 有 具体 如 下 。 
无 偏 估计 式 : 


有 俩 估计 去 : 


样本 的 & 陀 中心 矩 为 


MATLAB 工具 箱 中 提供 了 可 供用 户 求解 方差 、 标 准 差 . 矩 的 盟 数 ,具体 调用 格式 
如 下 。 

1) var(0) 方 差 函 数 

(1) V =var(X) 。 在 大 为 问 量 , 则 返回 回 量 的 样本 方差 值 ; 和 若 厌 为 矩阵 , 则 返回 矩阵 
各 列 回 量 方差 组 成 的 行 回 量 。 其 采用 无 偏 式 计算 方差 。 

(2) V =var(X,1)。 力 数 采 用 有 偏 估 计 式 计算 天 的 方差 , 即 前 置 因 了 于 为 1/n。var 
(X,0) 等 同 于 var(X) ,其 采用 无 偏 式 计算 方差 ,前 置 因 子 为 1/(z 一 1)。 

(3) V =var(X,w)。 畏 数 返 回 关 以 w 为 权 的 方差 。 对 于 和 矩阵 兰 ,w 的 元 素 个 数 必 须 
等 于 美的 行 数 ; 对 于 向 量 羡 ,w 的 元 素 个 数 与 美的 元 素 个 数 相 同 。 

(4) V =var(X， flag，dim)。 晴 数 返 回 半 在 特定 维 上 的 方差 ,dim 指定 维 数 ,flag 指 
定 选 择 的 计算 式 。flag =0, 选 择 无 偏 式 计算 ; flag =1 ,选择 有 偏 式 计算 ，。 

【 例 12-2】 对 于 下 列 随 机 变量 X ,求解 其 相应 的 方差 。 

四 二 [336] 


由 MATLAB 目 市 工具 箱 曲 效 进 行 方差 计算 ,具体 编程 如 下 : 


Clce 
clear all; 
Close all: 


warning off 


一 [|123j 


务 清 屏 

秆 删除 workplace 变量 
委 关 掉 显 示 图 形 窗口 
多 不 显示 警告 


Co ee 
国志 


一 商工 合 衬 工 芋 其 高 


X= [336;]; 第 数据 

w = [1 2 3;]; 名 权 值 

YL = var(X) 秆 方差 

2 rarlxo0) 名 无 偏 估 计 

3 = var(X,1) 告 有 人 恼 估 计 

vd = var(X,w) 秆 权 值 Ww 的 方差 
5 = varlix 0.2) 名 无 偏 估 计 


运行 程序 ,输出 结果 如 下 


(1) s =std(X)。 畏 数 返 回回 量 ( 和 矩阵 ) 关 的 标准 差 ( 前 置 因子 1/ Cn 一 1))。 

(2) s =std(X, flag)。flag =0, 前 置 因子 为 1/(n 一 1); flag =1, 前 置 因 子 为 1/n。 

(3) s =std(X,， fag，dim)。 上 因数 返回 天 在 特定 维 上 的 标准 善 ,dim 指定 维 数 ,flag 指 
定 选择 的 计算 式 。 

【 例 12-33 对 于 下 列 随 机 变 


量 天 ,求解 其 相应 的 标准 差 。 
和 一 [336] 
一 |123| 
由 MATLAB 上 自 审 工具 箱 图 数 进 行 标准 差 计 算 ,具体 编程 如 下 : 


委 标准 差 

cle 当 清 屏 

clear all; 秆 删除 workplace 变量 
close all; 竺 关 挤 显示 图 形 窗 口 
warning off 竺 不 显示 警告 
三 和 数据 

w= [123;]; 多 权 值 

yl = std(X) 竺 标准 差 


FI 目 


1 
| 国 402 
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Y2 = std(X,0) 名 前 置 因 子 值 等 于 1/(n 一 1) 
y3 = std(X,1) 当前 置 因子 值 等 于 1/n 
v4 = std(X,w) 先 权 值 w 的 标准 差 


运行 程序 输出 结 采 如 下 : 


2.2500 


3) moment(C) 息 图 数 
(1) m =moment( 久 ，order) 。 力 数 返 回回 量 ( 算 阵 ) 束 的 R 阶 中 心 矩 。order 规定 中 
心算 的 队 数 。 
(2) m =moment(XX, order, dim)。 了 荫 数 返回 dim 维 上 的 天 的 中 心 和 矩 。 
【 例 12-4】 对 于 下 列 随机 变量 天 :求解 其 相应 的 和 矩 。 
=|123;336;468;477|; 
由 MATLAB 日 市 工具 箱 晴 数 进 行 答 计算 ,具体 编程 如 下 : 


秆 捧 

Cle 多 清 屏 

clear all; 秆 删除 workplace 变量 

close all; 多 关 挤 显示 图 形 祖 口 

warning off 先 不 显示 警告 

X= [123;336;.468; 477 了 |:; 竺 数据 

yl = moment(X,3) 竺 计算 矩阵 和 各 列 的 3 了 3 阶 纸 

y2 = moment(X,3,2) 当 计 算 和 矩阵 和 X 各 行 的 3 阶 矩 ,并 返回 2 维 上 的 中 心 抵 


一 】 .5000 0 一 4.5000 


12.2.3 协 方差 、 相 关系 数 


随机 变量 zx、y 的 协 方 差 和 相关 系数 的 定义 式 为 


cov(xT»y) = E{|x— E(x) | ly 一 五 (Cy) | ) 
COVCT» YY) 
v D(CYy) 
对 于 nn 维 随 机 变量 ,通常 用 协 方差 矩阵 摘 述 它 的 2 阶 中心 矩 。 如 对 于 二 维 随机 变量 
(x,y) ,定义 协 方差 矩阵 形式 为 


cof(x,y) 一 


其 中 
cii 一 五 (人 [元 一 丙 ( 天 7) |} 
cw 一 E{[lzx— ECxr) | Ly 一 五 (y) |} 
ca = Fi[y— ECy) || zx EcCxr) | ) 
czz = E{[y— E(y)])} 
其 相应 的 样本 协 方差 形式 与 样本 方差 形式 类 似 ,在 此 不 再 歼 述 。 


用 户 可 以 根据 帮助 提示 很 容易 地 进行 协 方差 和 相关 系数 的 求解 。 
1) cov() 计 算 协 方差 
(1) C =cov(X) 。 大 为 回 量 时 ,图 数 返 回 此 回 量 的 方差 。 瑟 为 矩阵 时 ,和 矩阵 的 每 一 行 
表示 一 组 观察 值 ,每 一 列 代 表 一 个 变量 。 畏 数 返 回 此 和 矩阵 的 协 方 差 矩 阵 , 其 中 协 方 差 矩 
阵 的 对 角 元 率 是 系 和 矩阵 的 列 回 量 的 方差 值 。 
(2) C =cov(X,Y)。 返 回 半 YY 的 协 方差 矩阵 ,其 中 半 Y 行 数 和 列 数 相同 。 
(3) C=cov(X,1),C =cov(X,Y,1)。 计 算 协 方差 矩阵 时 前 置 系 数 取 1/n。cov(X,0) 
与 cov(CX) 相 同 ,都 是 取 前 置 系数 为 17/(C2 一 1) ,此 用 法 可 参考 var 好 数 ， 
【 例 12-S]】 对 于 下 列 随 机 变量 X 和 Y, 求 解 其 相应 的 协 方差 。 
= [0.0654;0.0656;0.06566;0,065;0.065;0.066;0.0666] 
Y = [0.00167;0.001;0. 00279;0. 00200;0. 003879;0. 0050;0. 006] 
由 MATLAB 目 带 工具 箱 困 数 进 行 协 方差 计 算 .具体 编程 如 下 : 


Clc 对 清 屏 


clear all; 秆 删除 workplace 变量 
close all; 第 美 撞 显 示 图 形 窗 口 
warning off 第 不 显示 警告 


x = [0.0654;0.0656;0.06566;0.065;0.065;0.066;0.0666]; 
y = [0.00167;0.001;0.00279;0.00200;0.003879;0.0050;0.006]; 


cx = cov(x) 竺 到 的 协 方 差 
vxX = var(x) 秆 广 的 方差 
Cxy = cov(x,y) 对 和 了 的 协 方 差 


运行 程序 ,输出 结果 如 下 : 


EE 
3.205le— O07 


油 三 富 池 于 常识 识 党 国 污 
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3.205le— OT 


CXY = 
1 人 一 个 3 关 
0.0321 0. 0686 


0.0686 0. 3388 


2) corrcoef() 计 算 相 关系 数 
(1) BR =corrcoef( 和 )。 返 回 算 阵 太 的 相关 系数 组 阵 , 其 各 点 全 对 应 于 相关 和 矩 阵 的 各 
点 值 除 以 相应 的 标准 差 。 
(2) R =corrcoef(x,y)。 返 回 x、y 的 相关 系数 算 阵 。 咎 xy 分别 为 列 回 量 , 则 该 命令 
等 同 于 R =corrcoe{(| x vy |)。 
(3) [LR.P] =corrcoef(…)。 返 回 的 王 和 矩阵 是 不 相关 假设 检验 的 户 值 。 
(4) [R, P, RLO, RUP|=corrcoef(*…)。 对 于 每 一 个 民 值 ,返回 的 95% 置 信和 区 间 为 
| RLO, RUP | 。 
【 例 12-6〗 对 于 下 列 随 机 变量 三 和 YY. 求解 其 相应 本 
天 一 |0.0654;0.0656;0.065663;0. 0653;0.065;10.0663;0.0666 | 
Y = |0.00167;0.001;0.00279;0.00200;0.003879;0.0050;0.006 | 
由 MATLAB 日 市 工具 箱 也 数 进行 相关 系数 计算 ,具体 编程 如 下 : 


当 相关 系数 

CLE 竺 清 屏 

clear all; 多 删除 workplace 变量 
close all; 秆 关 挤 显示 图 形 窗 口 
warning off 多 不 显示 警告 


xX = [0.0654;0.0656;0.06566;0.065;0.065;0.066;0.0666|]; 
y = [0.00167;0.001;0.00279;0.00200;0.003879;0.0050;0.006]; 
cor = corrcoef(x,y) 先 文 .V 相关 系数 


运行 程序 ,输出 结果 如 下 : 


1.0000 0.6580 
0.6580 1] .0000 


12.3 一 维 随机 数 生 成 


生成 随机 数 有 两 种 选择 ,可 以 每 次 只 生成 一 个 随机 数 , 和 下 接 用 此 数 计 算 f(x), 然后 
循环 重复 此 过 程 , 最 后 求 平 均值 ; 为 .种 方法 是 每 次 生成 全 部 循环 所 震 的 随机 数 ,利用 
MATLAB 和 矩阵 运算 语法 计算 f(z) :不 震 要 与 循环 ,直接 即 可 求 平 均值。 前 一 种 方法 代 
人 码 傈 单 , 但 速度 慢 ; 后 一 种 方法 代码 相对 更 难 写 。 


生成 了 一 维 的 随机 数 后 ,可 以 用 hist() 函数 查看 这 些 数 服从 的 大 致 分 布 情况 。 
1. rand() 


生成 (0,1) 区 间 上 均匀 分 布 的 随机 变量 。MATLAB 陵 数 调用 如 下 : 


rand( [M,N,P .… ]) 计 


- 什 溯 工 营 开 训 下 图 党 


生成 排列 成 M 关 六 关 卫 … 多 维 回 量 的 随机 数 。 如 采 只 写 M, 则 生成 MXM 和 矩阵; 如 
来 瑚 数 为 LM ,Nj, 则 可 以 省 略 挥 方 打 写 。MATLAB 编程 如 下 : 


rand(5,1) 多 生成 5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
rand( 5) 和 生成 5 行 5 列 的 随机 数 和 矩阵 
rand([5,4]) 秆 生成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-7】 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 


clc,clear,close all 
x= rand(100000,1); 
hist{(x, 30}); 


运行 程序 可 生成 的 随机 数 很 符合 均 习 分布 ,如 图 12-1 所 示 。 
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图 12-1 均匀 分 布 


2. randn() 
生成 服从 标准 正 态 分 布 ( 均 值 为 0, 方 差 为 1) 的 随机 数 。MATLAB 了 响 数 调用 如 下 : 


生成 排列 成 Mx NXP… 多 维 癌 量 的 随机 数 。 如 来 只 写 M; 则 生成 Mx M 矩阵; 如 
来 参数 为 LM .Nj], 则 可 以 和 省略 挥 方 打 号。MATLAB 编程 如 下 : 


-MATLAB 科 学 计算 


randn(5,1) 秆 生成 5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
randn( 5) 和 生成 5 行 5 列 的 随机 数 纸 阵 
randn( [5,4]) 委 生 成 一 个 5 行 4 列 的 随机 数 短 阵 


【 例 12-83 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 
clc,clear,cCclose all 


x= randn(100000,1); 
hist(x, 50):- 


运行 程序 可 看 到 生成 的 随机 数 很 符合 标准 正 态 分 布 ,如 图 12-2 所 示 。 
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图 12-2 正 态 分 布 


3. unifrnd() 

与 rand() 类 似 ,这 个 函数 生成 某 个 区 间 内 均匀 分 布 的 随机 数 。MATLAB 函数 调用 
如 下 : 

unifrnd(a,b,[M,N,P, -. |) 

生成 的 随机 数 区 间 在 Ca, 已 内 ,排列 成 MXNXP… 多 维 向 量 。 如 果 只 写 M, 则 生成 
AMXAM 算 阵 ; 如 果 和 参数 为 LAM, Nj, 则 可 以 省 略 方 插 写 。MATLAB 编程 如 下 : 


多 生成 的 随机 数 都 在 (一 2,3) 区 间 内 


unifrnd( — 2,3,5,1) 秆 生成 5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
unifrnd( — 2,3,5) 当 生 成 5 行 5 列 的 随机 数 矩 阵 
unifrnd( 一 2,3,[5,4]) 贡生 成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-9】 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 


clc,clear,close all 
X= unifrnd( — 2,3,100000,1); 
hist(x, 50) ，; 


运行 程序 可 看 到 生成 的 随机 效 很 待 合 区 间 ( 一 2:3) 上 的 均 习 分 布 , 如 图 12-3 所 示 。 
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图 12-3 均匀 分 布 


4. normrnd() 

与 randn() 类 似 , 此 函数 生成 指定 均值 .标准 差 的 正 态 分 布 的 随机 数 。MATLAB 丽 
数 调用 如 下 : 

normrnd(mu, sigma, [M,NE，… |]) 


生成 的 随机 数 服 从 均值 为 mu, 标 准 差 为 sigma( 注 意 标 准 差 是正 数 ) 正 态 分 布 , 这 些 
随机 数 排列 成 MX NX P… 多 维 同 量 。 如 采 只 写 M: 则 生成 Mx M 和 定 阵 ; 如 采 和 参数 为 
LM, NJ,; 则 可 以 省 略 方 插 号。MATLAB 编程 如 下 : 


和 生成 的 随机 数 所 服从 的 正 态 分 布 都 是 均值 为 2, 标 准 差 为 3 


normrnd(2,3,5,1) 和 生成 5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
normrnd(2,3,5) 竺 生成 5 行 5 列 的 随机 数 纸 阵 
normrnd(2 ,3,[5,4]) 当 生 成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-10】 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 


clc,clear,close all 

xX= normrnd(0,1,100000,1):; 
subplot(211), hist(x,50); 
X= normrnd(3,3,100000,1):; 
subplot(212),hist(x,50); 


rr MATLAB 科 学 计算 


运行 程序 可 看 到 生成 的 随机 数 的 正 态 分 布 , 如 图 12-4 所 示 。 


图 12-4 正 态 分 布 


如 图 12-4 所 示 , 上 半 部 分 是 由 均值 为 0, 标准 差 为 1 的 10 万 个 随机 数 的 大 致 分 布 , 下 
半 部 分 是 由 均值 为 2, 标准 差 为 1 的 10 万 个 随机 数 的 大 致 分 布 。 

注意 到 下 半 个 图 像 的 对 称 轴 回 正 方 回 偏 移 ( 准 确 说 移动 到 z 一 2 处 ), 这 是 由 于 均值 
为 2 的 结果 。 

5. chi2rnd() 


此 肯 数 生成 服从 卡 方 (Chi-square) 分 布 的 随机 数 。 卡 方 分 布 只 有 一 个 参数 : 日 由 度 
v。MATLAB 上 蚂 数 调用 如 下 : 

chi2rnd(v,[M,N,P, -.. |]) 

生成 的 随机 数 服 从 日 由 讶 为 vv 的 卡 方 分 布 ,这 些 随 机 数 排 列 成 MXxN XP… 多 维 问 
量 。 如 果 只 写 M, 则 生成 MxM 和 矩阵 ; 如 果 参 数 为 LM,，Nj:, 则 可 以 省 略 方 括号 。 

MATLAB 编程 如 下 : 


委 生 成 的 随机 数 所 服从 的 卡 方 分 布 的 自由 度 都 是 5 


chi2rnd(5,5,1) 秆 生成 5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
chi2rnd(5,5) 对 生成 5 行 5 列 的 随机 数 和 矩阵 
chi2rnd(5, [5,4]) 先生 成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-11 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 
clc,clear,close all 


X= chi2rnd(5,100000,1):; 
hist{(x, 50):; 


运行 程 订 可 看 到 生成 的 随机 数 的 卡 方 分 布 , 如 图 12-5 所 示 。 


6、{frnd() 

此 上 盟 数 生成 服从 下 分布 的 随机 数 。E 分 布 有 两 个 参数 : vl 和 v2 。 
MATLAB 也 数 调 用 如 下 : 

frnd(vl1,v2,[M,N,P, …]) 


生成 的 随机 数 服从 参数 为 (vl,v2) 的 卡 方 分 布 , 这 些 随 机 数 排 列 成 MXN XP… 和 多 维 
回 量 。 如 果 只 写 M, 则 生成 Mx M 矩阵; 如果 参数 为 LM ,NN], 则 可 以 省 略 方 括号 。 
MATLAB 编程 如 下 : 


当 生 成 的 随机 数 所 服从 的 参数 为 (vL=3v2=5) 的 了 分 布 


frnd(3,5,5,1) 先生 成 5 个 随机 数 排列 的 列 向 量 , 一 般 用 这 种 格式 
frnd(3,5,5) 先生 成 5 行 5 列 的 随机 数 和 矩阵 
frnd(3,5,[5,4]) 委 生 成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-12】 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 


clc,clear, close all 
x= frnd(3,5,1000,1):; 
hist(x, 50); 


运行 程序 可 看 到 生成 的 随机 数 的 下 分 布 , 如 图 12-6 所 示 。 
从 图 12-6 可 以 看 出 来 ,F 分 布 集中 在 正 半 和 轴 的 左 侧 , 但 是 它 在 极 问 值 处 也 很 可 能 
有 一 些 取 值 。 


7. trnd() 


此 卫 数 生成 服从 t(Student's t Distribution) 分 布 的 随机 数 。t 分 布 有 一 个 参数 . 自 
由 度 vw。MATLAB 晒 数 调用 如 下 : 


trnd(v, [M,N,P, .… |]) 


下 本 = 
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图 12-6 下 分 布 


生成 的 随机 数 服从 和 参数 为 vv 的 tt 分布, 这些 随 机 数 排 列 成 Mx NX P… 多 维 向 量 。 


如 果 只 写 M, 则 生成 MX M 矩阵 ; 如 果 和 参数 为 LM ,Nj, 则 可 以 省 略 方 括号 。MATLAB 
编程 如 下 : 


多 生成 的 随机 数 所 服从 的 厌 数 为 (Vv=7) 的 七 分 布 

trnd{(7,5,1) 先生 成 ,5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
trnd(7,5) 先生 成 5 行 5 列 的 随机 数 和 矩阵 

trnd(7,[5,4]) 竺 生成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-13 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 


clc,clear,close all 
X= trnd(7,100000,1); 
hist(x, 50}:; 


运行 程序 可 看 到 生成 的 随机 数 的 t 分 布 , 如 图 12-7 所 示 。 
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由 图 12-7 可 知 ,t 分 布 比 标 准 正 态 分 布 要 ”" 瘦 ”, 不 过 随 独 目 由 上 度 的 增 大 :t 分 布 会 
逐渐 变 胖 , 当 目 由 度 为 正 无 穷 时 , 它 驶 变 成 标准 正 仿 分 布 了 。 


8，、betarnd() 


此 函数 生成 服从 beta 分 布 的 随机 数 。beta 分 布 有 两 个 参数 ,分 别 是 A 和 已 。 
生成 beta 分 布 随机 数 的 MATLAB 上 曙 数 调用 如 下 : 
betarnd(A,B, [M,N,P, .…]) 


产生 A 二 2,B 二 5 的 beta 分 布 的 PDF 图 形 编 程 如 下 : 


clc,clear,close all 
X= betarnd(2,5,100000,1); 
hist{(x, 50):; 


运行 程序 可 看 到 生成 的 随机 数 的 beta 分 布 ,如 图 12-8 所 示 。 
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图 12-8 ”beta 分 布 


9. exprnd() 


此 上 盟 数 生成 服从 指数 分 布 的 随机 数 。 指 数 分 布 只 有 一 个 参数 : mu。 生 成 指数 分 布 
随机 数 的 MATLAB 隐 数 调用 如 下 : 
exprnd (mu, [M,N,P, … ]) 


产生 mu 二 3 的 指数 分 布 的 PDF 图 形 编 程 如 下 : 


clc,clear,close all 
X= exprnd(3,100000,1); 
hist(x, 50}); 


运行 程 订 可 看 到 生成 的 随机 数 的 指数 分 布 , 如 图 12-9 所 示 。 
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图 12-9 指数 分 布 


10. gamrnd() 


| 生成 服从 Gamma 分 布 的 随机 数 。Gamma 分 布 有 两 个 参数 : A 和 BB。 生 成 Gamma 
分 布 随 机 数 的 MATLAB 了 呐 数 调用 如 下 : 
gamrnd( A, B, [M, N, 上 a ] ) 


产生 A 二 2,B 二 5 的 Gamma 分 布 的 PDF 图 形 编 程 如 下 : 


clc,clear,close all 
x= gamrnd(2,5,100000,1); 
hist(x,50); 


\ 运行 程序 可 看 到 生成 的 随机 数 的 Gamma 分 布 ,如 图 12-10 所 示 。 


12000 


| 10000 


0 10 20 30 40 30 6U 70 8U 


图 12-10 Gamma 分 布 


11. lognrnd() 


生成 服从 对 数 正 态 分 布 的 随机 数 。 其 有 两 个 参数 : mu 和 sigma, 这 样 的 随机 数 取 对 
数 后 就 服从 均值 为 mu, 标 准 差 为 sigma 的 正 态 分 布 。 生 成 对 数 正 态 分 布 随机 数 的 
MATLAB 因数 调用 如 下 : 

lognrnd(mu, sigma, [M,N,P, … |]) 

产生 mu 一 一 1，sigma 一 0.5 的 对 数 正 态 分 布 的 PDF 图 形 编 程 如 下 : 

clc,clear,close all 


XxX= lognrnd(— 1,0.5,1000,1); 
hist(x,50); 


运行 程序 可 看 到 生成 的 随机 数 的 对 数 正 态 分 布 , 如 图 12-11 所 示 。 
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图 12-11 对 数 正 态 分 布 


12. raylrnd() 


生成 服从 瑞 利 (Rayleigh) 分 布 的 随机 数 。 其 分 布 有 一 个 和 参数: B。 生 成 瑞 利 分 布 随 
机 效 的 MATLAB 蚂 数 调用 如 下 : 
raylrnd(B, [M,N, P, … ]) 


产生 BB 二 2 的 瑞 利 分 布 的 PDF 图 形 编 程 如 下 : 


clc,clear,cCclose all 
XxX= lognrnd(— 1,0.5,1000,1); 
hist(x,50); 


运行 程序 可 看 到 生成 的 随机 数 的 瑞 利 分 布 , 如 图 12-12 所 示 。 
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图 12-12 瑞 利 分 布 


13. whblrnd() 


生成 服从 威 布尔 (Weibull) 分 布 的 随机 数 ，。 其 分 布 有 两 个 参数 : scale 参数 A 和 
shape 参数 B。 生 成 威 布尔 分 布 随 机 数 的 MATLAB 果 数 调用 如 下 : 
wblrnd(A,B,[M,N,P, 1) 


产生 A 二 3,B 二 2 的 威 布尔 分 布 的 PDF 图 形 编程 如 下 : 


clc,clear,close all 
xX= whlrnd(— 1,0.5,1000,1); 
hist{(x, 50) : 


运行 程序 可 看 到 生成 的 随机 数 的 威 布 尔 分 布 图 ,如 图 12-13 所 示 。 
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图 12-13 威 布尔 分 布 


除了 了 上述 的 分 布 方法 ,还 有 非 中 心 卡 方 分 布 Cncx2rnd) . 非 中 心 下 分 布 Cncfrnd) 、. 非 中 
心 t 分 布 (nctrnd) ,括号 中 是 生成 服从 这 些 分 布 的 函数 ,具体 用 法 可 参看 MATLAB 帮助 
文件 。 

14. unidrnd(C) 

此 函数 生成 服从 离散 均匀 分 布 的 随机 数 。unifrnd 是 在 某 个 区 间 内 均匀 选取 实数 
(可 为 小 数 或 整数 ) ,unidrnd 是 均匀 选取 整数 随机 数 。 离 做 均 久 分 布 随 机 数 有 一 个 参数 : 
n 表示 从 {11, 2. 3,…,N} 这 个 整数 中 以 相同 的 概率 抽样 。MATLAB 函数 调用 如 下 : 

unidrnd(n, [M,N, P, . ]) 

这 些 随 机 数 排 列 成 MXN XP… 和 多 维 同 量 。 如 果 只 写 M, 则 生成 MXxM 和 窍 阵 ; 如 果 
参数 为 LM，Nj, 则 可 以 省 略 掉 方 插 号 。MATLAB 编程 如 下 : 


和 生成 的 随机 燥 所 服从 的 套数 为 (10,0.3) 的 二 项 分 布 


unidrnd(5,5,1) 先生 成 ,5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
unidrnd(5,5) 当 生 成 5 行 5 列 的 随机 数 和 矩阵 
unidrnd(5,[5,4]) 币 生成 ,一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-14 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 
clc,clear,close all 


X= unidrnd(9,100000,1); 
hist(x,9). 


运行 程序 可 看 到 生成 的 随机 数 的 离散 均 习 分 布 , 如 图 12-14 所 示 。 
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图 12-14 离散 均匀 分 布 


15. binornd() 


此 陵 数 生成 服从 二 项 分 布 的 随机 数 。 二 项 分 布 有 两 个 参数 : n 和 pp。 考 上 处 一 个 打 轰 


MATLAB 科 学 计算 
的 例子 ,每 枪 命中 率 为 p, 共 射击 N 枪 ,那么 一 共 击 中 的 次 数 就 服从 参数 为 (N,p) 的 二 项 
分 布 。 注 意 ,p 要 小 于 等 于 1 和 且 非 负 ,N 要 为 整数 。MATLAB 函数 调用 如 下 : 
binornd(n,p, [M,N,P, -..]) 


生成 的 随机 数 服 从 参数 为 (2, pp) 的 二 项 分 布 ,这 些 随机 数 排 列 成 MxXN XP… 多 维 
回 量 。 如 果 只 写 M, 则 生成 Mx M 和 矩阵 ; 如 果 和 参数 为 LM,N | , 则 可 以 省 略 掉 方 括号 。 
MATLAB 编程 如 下 : 


和 生成 的 随机 数 所 服从 的 套数 为 (10,0.3) 的 二 项 分 布 


binornd(10,0.3,5,1) 当 生 成 5 个 随机 数 排列 的 列 向 量 , 一 般 用 这 种 格式 
binornd(10,0.3,5) 秆 生成 5 行 5 列 的 随机 数 算 阵 
binornd(10,0.3,[5,4]) 向 生成 一 个 5 行 4 列 的 随机 数 矩 阵 


【 例 12-1s] 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 
clc,clear,close all 


X= binornd(10,0.45,100000,1); 
hist{(x,11}:; 


运行 程序 可 看 到 生成 的 随机 数 的 二 项 分 布 ,如 图 12-15 所 示 。 


图 12-15 服从 二 项 分 布 


如 图 12-15 所 示 :可 将 此 直方 图 解释 为 ,假设 每 枪 射 击 命中 率 为 0.45, 每 轮 射 击 10 
次 , 共 进 行 10 万 轮 , 这 个 图 就 表示 这 10 万 轮 每 轮 命 中 成 绩 可 能 的 一 种 情况 。 


16. geornd() 


此 上 国 数 生成 服从 几何 分 布 的 随机 数 。 儿 何 分 布 的 参数 只 有 一 个 : p。 几 何 分 布 的 现 
实意 义 可 以 解释 为 ,打靶 命中 率 为 bp, 不 断 地 打 轩 ,直到 第 一 次 命中 目标 时 没有 击 中 次 数 
之 和 。 注 意 , 思 是 概率 ,所 以 要 小 于 等 于 1 且 非 负 。MATLAB 上 晒 数 调用 如 下 : 


1 2 
geornd!( pr [M, N, 上 ， 人 ]) 下 
屋 
这 些 随机 数 排 列 成 MX 六 关 了 PP… 多 维 回 量 。 如 有 打 只 与 M, 则 生成 MX 关 AM 和 窍 阵 ;如 采 下 
参数 为 LM，N] , 则 可 以 省 略 方 括号 。MATLAB 编程 如 下 : 计 
分 
% 生成 的 随机 数 所 服从 的 参数 为 (0.4) 的 二 项 分 布 . 
geornd(0.4,5,1) 先生 成 ,5 个 随机 数 排列 的 列 向 量 , 一 般 用 这 种 格式 算 
geornd(0.4,5) 当 生 成 5 行 5 列 的 随机 数 和 矩阵 
geornd(0.4,[5,4]) 向 生成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-16】 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 


Clc,clear,close all 
x= geornd(0.4,100000,1); 
hist(x, 50):; 


运行 程序 可 看 到 生成 的 随机 数 的 几何 分 布 , 如 图 12-16 所 示 。 


x 104 
4.0 


10 15 20 25 
图 12-16 几何 分 布 
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17. poissrnd() 

此 函数 生成 服从 泊 松 (Poisson) 分 布 的 随机 数 。 泊 松 分 布 的 参数 只 有 一 个 : lambda。 

poissrnd(p, [M,N,P, ]) 

这 些 随机 数 排列 成 MX NX P… 多 维 向 量 。 如 果 只 写 M, 则 生成 MX M 矩阵; 如 果 
参数 为 LM，Nj, 则 可 以 省 略 挥 方 插 号 。MATLAB 编程 如 下 : 


第 生成 的 随机 数 所 服从 的 参数 为 2 的 泊 松 分布 
poissrnd(2,5,1) 第 生成 5 个 随机 数 排 列 的 列 向 量 , 一 般 用 这 种 格式 
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poissrnd(2,5) 和 争 生 成 ,5 行 5 列 的 随机 数 和 矩阵 
poissrnd(2,|[5,4]) 先生 成 一 个 5 行 4 列 的 随机 数 和 矩阵 


【 例 12-17】 生成 随机 数 大 致 的 分 布 。 编 程 如 下 : 
clc,clear,close all 


xX= poissrnd(2,100000,1); 
hist(x, 50); 


运行 程序 可 看 到 生成 的 随机 数 的 泊 松 分 布 ,如 图 12-17 所 示 。 
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图 12-17 浊 松 分 布 


其 他 离散 分 布 还 有 超 几 何 分 布 (hypergeometric, 图 数 是 hygernd( )) 等 , 详 见 
MATLAB 帮助 文档 。 


12.4 特殊 连续 分 布 


将 MATLAB 中 没有 对 应 函数 的 分 布 称 为 特殊 分 布 。 有 多 种 方法 可 以 用 于 生产 服 
从 这 些 分 布 的 随机 数 。 这 里 主要 介绍 两 种 最 第 见 的 。 


1. 逆 CDF 函数 法 


如 末 已 知 某 特定 一 维 分 布 的 CDF 上 姑 数 ,经 过 如 下 几 个 步 又 即 可 生成 符合 该 分 布 的 
随机 数 。 

(1) 计算 CDF 图 数 的 反 图 数 : 下 (x)。 

(2) 生成 服从 [0,1j 区 则 上 均匀 分 布 的 初 她 随 机 数 a。 

(3) 令 ZE (Q), 则 工 即 服从 需要 的 特定 分 布 的 随机 数 。 

为 了 更 形象 解说 这 种 方法 ,这 里 选取 柯 西 4Cauchy) 分 布 作 为 例 于 。 有 时 也 称 其 为 洛 
伦 北 分布 或 者 Breit Wigner 分 布 。 柯 西 分 布 有 一 大 特点 就 是 ,人 它 是 肥 尾 (fat-tail, 又 详 作 
胖 尾 ) 分 布 。 在 金融 市 场 中 , 肥 尾 分 布 越 来 越 受 到 重视 ,因为 在 传统 的 正 态 分 布 基 本 不 考 


原 像 当前 次 贫 危 机 每 极端 情 帝 ,而 肥 尾 分 布 则 能 很 好 地 将 很 极 妆 的 悄 背 考虑 进去 。 


柯 西 分 布 概率 密度 图 数 编程 如 下 : 


clce 名 清 屏 

clear all; 秆 删除 workplace 变量 
close all; 秆 关 撞 显示 图 形 窗 口 
warning off 多 不 显示 警告 

无 三 15::0.01:15-: 

subplot(211 ), 


plot(x, cauchypdf(x), ''linewidth', 2); 
title(l 'Cauchy 分 布 ') 

x2= 1./sgqrt(2 x pi) x exp( — x.*2/2); 
subplot(212), 

plot(x, x2, 'linewidth', 2); 

title(' 正 态 分 布 ') 


相应 的 柯 西 分 布 概 诗 密 度 图 效 如 下 : 
function p= cauchypdf(x, varargin) 


负 黑 认 值 
忌 三 O.D; 
b= 1.0: 


当 检查 套数 
if(nmrgin >= 2) 
a= varargin{l1}; 
if(nargin == 3) 
b= varargin{21}; 
blb<= 0)= MayN: 
end 
end 
if((nargin <1) || (nargin > 3)) 
error('At least one argument, at most three! '}); 
end 


千 Calculate 
ED 


end 


运行 程序 ,输出 图 形 如 图 12-18 所 示 。 


图 12-18 所 示 是 柯 西 分 布 和 标准 正 态 分 布 PDF 对 比 图 ,可 清楚 地 看 出 柯 西 分 布 的 尾 
巴 (z 轴 两 辛 ) 更 “ 腾 一 点 。 


柯 西 分 布 的 PDF 了 冰 灼 是 
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Cauchy 分 布 


正 态 分 布 
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图 12-18 柯 西 分 布 和 标准 正 态 分 布 


向 化 起 见 , 只 考 奈 zo 王 0:7 一 1 的 情形 。 此 时 PDF 晒 数 是 


区 省 一 一 1 
J \z) r(C1 十 并 2) 
PDF 函数 对 z+ 作 积分 ,就 得 到 CDF 函数 ， 
arctan (x) 


Ep 
Flix) = 5 | 本 


现在 采用 以 下 三 个 步骤 来 生成 服从 柯 西 分 布 的 随机 数 : 
(1) 计算 得 到 柯 西 分 布 CDF 盟 数 的 反 曲 数 为 
F(z) = tan| (x— 去 "| 
(2) 使 用 rand() 函 数 生 成 (0,1) 区 间 上 均匀 分 布 的 初始 随机 数 。 程 序 如 下 : 
original x= rand(1,100000); 


(3) 将 初始 随机 数 代 入 CDF 反 销 数 即 可 得 到 需要 的 柯 西 随机 数 。 编 程 如 下 : 


cauchy x= tan((original x— 1/2) * pi); 


由 以 上 三 步 可 得 10 万 个 服从 会 数 为 (zo 二 0,Y 二 1) 柯 西 分 布 的 随机 数 。 
产生 柯 西 分 布 程序 如 下 : 


Cle 多 清 屏 

clear all.;. 竺 删 | 除 workplace 变量 
Close all; 向 关 掉 显示 图 形 窗 口 
warning off 秆 不 显示 警告 


= 15:0.001:15- 
p = cauchypdf(x); 
x2 = cauchyrnd(0,1,10): 


hist(x2,20) 


function r= cauchyrnd(varargin) 
委 Default values 


| 县 
统 
计 
分 
fh 
计 
算 


辟 三 OO.D: 
b= 1.0; 
了 三 下 

和 检查 参数 


if(nmrgin>= 1) 
a= varargin{l1}:; 
if(lnargin>= 2) 
b= vararginl21: 
btb<= 0)= NaN; 
if(nargin>= 3), n= [varargin{3:end}|]; end 
end 
end 
SS Generate 
I= cauchyinv(rand(n), a, b); 


end 


这 种 方法 生成 随机 数 与 柯 西 分 布 图 形 如 图 12-19 所 示 。 


由 此 可 看 出 生成 的 随机 数 行 合 柯 西 分 布 。 

注意 : 图 12-19 中 略 去 了 工 轴 小 于 一 12.5 和 大 于 12.5 部 分 的 图 形 , 因 为 柯 西 分 布 是 
胖 尾 分 布 , 可 能 会 生成 出 不 少 取 值 很 大 的 随机 数 。 

这 种 方法 本 身 昌 然 很 简单 ,效率 也 很 高 ,但 有 如 下 受 限 之 处 : 

(1) 有 的 CDF 明 数 的 反 图 数 在 0 或 者 1 处 的 值 是 正 / 负 无 穷 : 例 如 此 处 的 柯 西 分 布 
就 是 这 样 , 倘 奉 用 (0,1) 均 后 分 布 产生 的 初始 随机 数 中 包含 0 或 者 1, 那么 这 个 程序 会 出 
错 。 不 同 版 本 的 MATLAB 的 这 种 情况 也 许 会 改变 。 


严格 大 于 零 ,否则 CDF 的 反 上 因数 不 存在 。 
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(3) 即使 CDF 哨 数 存在 ;如 果 它 太 复 洒 , 也 可 能 导致 计算 速度 太 慢 ,甚至 无 法 计算 。 
2. 接 这 /拒绝 法 


接受 /拒绝 法 (accelptence-rejection) 方 法 的 精 骨 在 于 “形似”, 可 以 形象 地 将 其 比喻 为 
制作 冰 导 一 一 二 者 相同 之 处 在 于 都 要 首先 堆砌 出 委 形 ,然后 册 将 多 出 的 部 分 削 去 。 用 此 
法 生成 服从 Fz) 分 布 的 随机 数 , 分 为 如 下 几 大 步骤 : 

(1) 选用 某 个 分 布 , 如 PDF 为 gCz) 的 分 布 , 此 时 要 计算 一 个 稼 数 c, 使 得 f (x) 三 
cg(X) ,对 工 定 义 域 内 任意 的 z 都 成 立 一 一 这 相当 于 使 cg(x) 图 形 完 全 “和 窗 盖 ” 住 f(z) 图形 ， 

(2) 生成 服从 PDF 为 g(xz) 分 布 的 随机 数 , 假 设 生成 的 随机 数 为 zo。 

(3) 生成 一 个 服从 (0,1) 则 的 均匀 分 布 的 随机 数 y。 

(4) 如 采 > 一- 全 去 茎 生成 的 xo; 反之 ,生成 的 ze 就 是 再 要 的 、 服从 f(x) 分 布 的 随 
村 LL 站。 

【 例 12-18】 下 面 用 一 个 例子 结合 图 形 解 释 这 种 方法 ,假设 生成 的 分 布 是 


(元 一 0.57)7 
2. 4 


此 PDF 图 形 如 图 12-20 所 示 的 蓝 色 曲线 。 编 程 如 下 : 


(Xx) 一 


clc,clear,close all 

x0 = unifrnd(0,2,1,10000); 

fx = (x0—0.5). * (x0—0.5})/2.4; 
plot(x0, fx,"'."') 

xl = [0,2]; 

vil=|[0.5,0.51]; 

hold on 

plot(xl, vl,'g', linewidth',2) 
wa = [| 

y2= [max(fx),max(fx) |; 
plot(x2, v2, 'T', "linewidth', 2) 


运行 程序 ,输出 图 形 如 图 12-20 所 示 。 

(1) 选用 (0,2) 之 间 的 均匀 分 布 作 为 原始 分 布 , 即 g (x) 二 0.5, 此 分 布 的 PDPF 图 见 
图 12-20。 由 条 件 : 无论 哪个 z+,f(7z) 夺 cg(7z) 部 要 成 立 , 由 此 计算 得 到 cc 要 大 于 等 于 10. 8。 
这 种 情况 下 ,一般 选择 c 二 1.875。 因 为 c 选 得 越 大 ,意味 着 堆砌 的 原始 雏形 越 大 ,需要 痢 
去 的 部 分 越 多 ,效率 越 低 ,所 以 应 使 得 c 尽量 地 小 。 

(2) 生成 服从 (0,2) 之 则 的 均匀 分 布 的 随机 数 , 设 它 为 zo ,程序 如 下 : 


X0 = nifrnd(0,2).- 


《3) 生成 一 个 服从 (0,1) 辐 的 均匀 分 布 的 随机 数 y, 程 厅 如 下 : 


Y= rand:; 


(4) 如 果 y 


的 xo ,重新 生成 ; 反之 ,生成 的 xo。 就 是 问题 本 身 需 闻 
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图 12-20 PDF 图 形 


的 、 服 从 f(z 分 布 的 随机 数 , 用 于 做 后 续 计 算 。 
以 上 步骤 每 次 只 能 处 理 一 个 随机 获 ,效率 较 低 。 下 面 这 段 代 码 可 以 一 次 性 生成 一 堆 
随机 效 ,编程 如 下 : 


N= 400000;c= 1.875;gx= 0.5 

x0 = unifrnd(0,2,1,NM); 

y= rand(1,N); 

Fa0= (x0—0.5) (x0—0 9591/2.4; 
final x= x0(v<= fx0. /c/gx); 


运行 程序 得 到 变量 final x 即 为 服从 f(zx) 分 布 的 随机 数组 成 的 一 个 行 向 量 。 用 
hist() 查 看 这 些 随 机 数 大 人 致 的 分 布 。 


hist(final x,50) ;title('f(x} = (x -0.5)*2/2.4'); 


运行 程序 ;输出 图 像 如 图 12-21 所 示 。 
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图 12-21 f(x) 分 布 
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如 图 12-21 所 示 , 生 成 的 随机 数 符 合 f(zx) 分 布 。 

这 种 方法 很 简单 ,也 不 需要 计算 CDF 限 数 的 反哺 数 , 但 它 也 有 如 下 受 限 之 处 : 

(1) 由 于 用 随机 数 y 来 控制 是 否 前 去 某 个 随机 数 zo, 所 以 无 法 准确 预知 最 终 得 到 的 
随机 数 数量 多 人 少 ， 

(2) 选择 合适 的 g(x) 分 布 是 此 方法 最 关键 的 技巧 所 在 。g(zx) 的 选择 原则 是 在 完全 
覆盖 f(x) 的 前 提 下 尽 可 能 与 f(x) 形似 ,二 者 形状 越 相 似 , 需 要 前 去 的 部 分 就 越 少 ,这 种 
方法 的 效率 就 越 高 。 很 多 时 候 , 这 种 方法 的 效率 过 低 ，。 


12.5 特殊 离散 分 布 


离 敌 分 布 关 键 在 于 获得 它 的 分 布 律 ,有 了 分 布 律 可 以 很 快 地 计算 小 于 等 于 东 个 数字 
的 办 积 概率 分 布 。 假 设 有 一 个 不 均 衬 的 角子 ,获得 6 个 点数 的 概率 如 表 12-3 所 示 。 


表 12-3 般 子 分 布 概率 


6 
概率 0. 2 
累积 点 数 三 6 

累积 概率 ] 


生成 人行 合 该 分 布 随机 数 的 步骤 如 下 : 

(1) 生成 一 个 (0,1) 则 均匀 分 布 的 随机 数 zo 。 

(2) 依据 ze 介 于 累积 概率 哪个 区 间 来 决定 毛 出 角子 的 点 数 。 如 0 二 zo 硅 0.1, 则 后 
1 一,0.8- 二 Xo0 寺 1 所 数 工 为 6。 

编程 如 下 : 


xX0 = Iamd ; 
1f x0 <0.1 
区 1 三 工 : 
elseif x0 <0.3 
X22 二 2; 
elseif x0 <0.4 
> 
elseif x0 <0.6 
X44= 4; 
elseif x0O <0.8 
二 
else 
Xb = 6; 
end 


这 段 语句 能 生成 一 个 服从 表 12-3 中 离散 分 布 的 随机 数 工 ,如 采 生 成 多 个 ,采用 用 御 
环 语句 。 生 成 10 万 个 随机 数 并 画 出 其 分 布 百 方 图 ,编程 如 下 : 


clc,clear,close all 


1 
| 
| 国 424 


XL = ;XXZX = ;x3=1; 
Xd = ;x =1] ;zxO=1，; 
fori=1:100000 
XO0 = rand.; 
if x0O <0.1 
Xl1] = x1iT1; 
elseif x0 <0.3 
二 1- 
elseif x0 <0.4 
下 二 下 3 十 1- 
elseif x0 <0.6 
X44 = x4 二 1; 
elseif x0 <0.8 
XD = XD]1; 


end 
X= [区 x2, x3, XA4,x5, x6|; 
bar(x) 


运行 程序 ,输出 图 形 如 图 12-22 所 示 。 
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12.6 生成 多 维 联合 分 布 随 机 数 


一 维 随机 变量 是 标量 (也 就 是 指 单独 的 一 个 数字 ) ,而 多 维 随 机 变量 是 一 个 向 量 。 
个 nn 维 随机 变量 x 是 有 7 个 分 量 的 问 量 (Xo, 关 1 六,) ,用 (xo ,X11 ,Xn) 表 示 联 合 分 
布 , 用 TD kR 维 的 边缘 分 布 。 川 fe ( Th | 入 1 一 二 1 ; 全， i dt i i = et . 


概 
: 
统 
计 
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下, 二 Xn ) 表示 当 分 量 成] 二 x1 ;并 2 二 2 二 Tx 上 个 分 量 x 的 
分 布 。 这 里 大 写 X 表示 随机 变量 某 个 维度 上 的 分 量 , 小 写 zx 表示 具体 的 数值 。 

各 种 生成 多 维 分 布 随 机 数 的 方法 一 般 步 又 部 是 , 偿 个 维度 生成 随机 数 分 量 , 最 后 将 
这 些 分 量 依 次 组 合 起 来 。 例 如 ,先生 成 XX,。, 上 骨 生 成 XX! ,… ,最 后 生成 XX, ,最 终 写 成 (Xo， 
区 

如 有 条 一 次 生成 一 个 工 维 的 随机 数 回 量 . 可 以 用 变量 来 储存 这 个 随机 数 的 ?个 分 
量 , 也 可 以 将 这 个 分 量 按照 次 序 存 于 一 个 1 Xn 的 行 问 量 中 。 

如 有 果 一 次 生成 随机 数 的 数量 很 多 ,如 NN 个 随机 数 , 前 面 两 种 办 法 都 可 以 用 , 即 可 用 
个 变量 来 储存 这 些 随 机 数 的 每 个 分 量 , 此 时 每 个 变量 是 NX1 的 列 回 量 ; 也 可 以 只 用 一 
个 NxXn 答 阵 储存 随机 数 所 有 分 量 ; 这 个 和 矩阵 每 一 行 是 一 个 服从 规定 的 联合 分 布 的 随机 
数 , 共 有 NN 行 即 表 示 共 储存 入 个 这 样 的 随机 数 , 和 矩阵 的 每 一 列表 示 这 NN 个 随机 数 的 一 
个 维度 上 的 分 量 , 共 有 7 个 维度 。 


12.6.1 各 维度 独立 


各 维度 独立 的 联合 分 布 随机 数 的 生成 最 为 方便 。 由 于 联合 分 布 图 数 就 是 每 个 维度 
边缘 分 布 力 数 的 直接 乘积 ,所 以 只 要 分 别 生成 每 个 维度 的 随机 数 分 量 , 然 后 组 合成 随机 
数 回 量 即 可 得 到 服从 该 联合 分 布 的 随机 数 。 

【 例 12-19】 生成 一 个 在 0 迄 z 委 2,0 和 过 y 和 2 正方 形 区 域 上 的 二 维 均 句 分布。 二 维 均 
句 分布 在 每 个 维度 上 都 是 均匀 分 布 ( 即 两 个 维度 的 边缘 分 布 都 是 (0, 2) 上 的 均匀 分 布 )， 
上 且 两 个 维度 互相 独立 。 

用 第 一 种 存储 方法 ,产生 单个 同 量 的 均匀 分 布 程序 如 下 : 


x= unifrnd(0,2); 


y= unifrnd(0,2); 


则 每 个 维度 上 分 别 生 成 一 个 服从 (0,，2) 均 匀 分 布 并 分 别 储存 在 +， x 这 两 个 变量 中 。 
如 果 一 次 生成 多 个 随机 数 , 如 AN 个 ,程序 如 下 : 


N= 400; 
x= unifrnd(0,2,N,1):; 
y= unifrnd(0,2,N,1); 


这 里 z+,y 部 是 NX1 大 小 的 列 癌 量 , 分 布 存 储 痢 这 NN 个 随机 数 的 第 一 维和 第 二 维 两 
个 分 量 。 查 看 这 些 随 机 数 是 否 很 好 地 符合 二 维 均 习 分 布 特性 ,程序 如 下 : 


scatter(x, vy); 


运行 程序 ,输出 图 像 如 图 12-23 所 示 。 
当然 ,对 于 产生 的 变量 也 可 以 采用 二 维 数据 来 进行 存储 ,MATLAB 程 序 如 下 : 


图 12-23 均匀 分 布 散 操 图 


二 [xrY|; 


由 于 两 个 维度 的 边缘 分 布 都 相同 旦 独立 ,因此 只 需 用 unifrnd 盟 数 一 次 性 生成 一 个 
NXn 大 小 的 矩阵 就 可 以 了 了。 


X= unifrnd(0,2,N,2).; 


【 例 12-20】 生成 的 随机 效 服 从 一 个 三 维 联合 分 布 , 其 第 一 维 边 绿 分 布 服从 标准 正 
态 ,第 二 维 边缘 分 布 是 月 由 度 为 4 的 1 分 布 , 第 三 维 边缘 分 布 是 月 由 度 为 (7， 8) 的 下 分 
布 ,各 个 维度 边际 的 边缘 分 布 之 间 相 互 独立 。 编 程 如 下 : 


Xxl1 = Iamd ; 

x2 = trnd(4); 
x3= frnd(7,8):; 
X= |xl1, x2, KI|: 


其 中 $1] st st 分 布 储存 二 个 维度 的 分量 和 然后 将 这 些 分 量 组 合 起 来 存 人 i hi 如 
来 要 一 次 就 能 生成 一 堆 这 样 的 随机 数 , 编 程 如 下 : 


N= 1000; 
x= [rand(N,1),trnd(4d, [N,11),frnd(7, 83,[N,1]1)})]; 


观察 该 联合 分 布 在 每 个 区 域内 的 概 认 密度 的 大 小 ,编程 如 下 : 


scatter3(x{(: ,1),x(:,2),x(:,3), marker', or 'sizedata', 10) : 


运行 程序 ,输出 图 形 如 图 12-24 所 示 。 
如 图 12-24 所 示 ,点 越 密 集 的 地 方 ,该 联合 分 布 概率 密度 曲 数 的 值 起 大。 特别 的 ,分 
别 从 zy,= 三 个 轴 的 角度 看 此 图 形 的 槛 截面 图 可 以 分 别 看 到 此 三 维 图 边缘 分 布 的 大 致 
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图 12-24 散 点 图 


12.6.2 协 方 差 阵 生成 多 元 正 态 分 布 


-个 n 维 的 随机 变量 ,其 协 方差 和 矩阵 为 一 个 nxn 大 小 的 和 矩阵 ,该 矩阵 对 角 线 上 的 元 
素 是 随机 变量 各 个 分 量 的 方差 ,矩阵 其 他 位 置 的 元 素 是 各 维 分 量 两 两 之 间 的 协 方 差 ; 此 
随机 变量 的 相关 系数 和 矩阵 也 是 一 个 nxXxn 大 小 的 矩阵 ,该 矩阵 对 角 线 上 的 元 素 孝 是 1, 其 
他 位 置 的 元 素 是 各 维 分量 两 两 之 间 的 相关 系数 。 这 两 个 矩阵 关系 非常 密切 。 

协 方差 矩阵 及 相关 系数 矩阵 揭示 了 不 同 纬度 之 则 的 线性 相关 关系 , 它 只 是 高 维 随 机 
变量 的 部 分 性 质 。 一 般 而 言 :仅仅 依据 协 方差 矩阵 或 相关 系数 矩阵 由 加 上 各 维度 的 边 毕 
分 布 信息 ,还 不 能 确定 此 随机 变量 的 联合 分 布 。 

如 表 12-4 所 示 是 一 个 两 维 的 离散 型 随机 变量 。 两 个 维度 的 边缘 分 布 都 是 (17/4， 
1/2,1/4) ,两 维 间 相关 系数 是 0。 


表 12-4 边缘 分 布 


| | | 
TC 


表 12-5 所 示 也 是 一 个 两 维 的 离散 型 随机 变量 。 两 个 维度 的 边缘 分 布 都 是 (1/4， 
1/2, 1/4) ,两 维 间 相 关系 数 是 0。 但 是 这 两 个 表 的 联合 分 布 是 不 同 的 , 即 二 者 是 两 个 不 
同 的 随机 变量 。 这 个 例子 说 明 边缘 分 布 加 相关 系数 并 不 能 完全 代表 多 维 分 布 的 所 有 
信息 。 


表 12-5 边缘 分 布 We 


做 
布 


但 是 有 一 类 特殊 的 分 布 : 多 元 正 态 分 布 , 它 的 全 部 信息 可 以 浓缩 成 边缘 分 布 加 相关 
系数 。 多 元 正 态 分 布 的 边缘 分 布 都 是 正 态 分 布 ,只 要 知道 每 个 维度 上 的 边际 正 态 分 布 的 
均值 和 标准 差 ,再 加 上 相关 系数 矩阵 ,就 可 以 得 到 整个 联合 分 布 。 

假定 要 生成 一 个 三 维 的 多 元 正 态 分 布 。 各 个 维度 均值 和 标准 差 如 表 12-6 所 示 。 


表 12-6 各 维度 均值 和 标准 差 


3 
相关 系数 矩阵 如 表 12-7 所 示 。 
表 12-7 相关 系数 矩阵 


针对 表 12-6 和 表 12-7 所 示 数 据 ,举例 说 明 如 下 。 
【 例 12-21 生成 各 维度 上 的 独立 的 正 态 分 布 随 机 数 。 注 : 此 处 代码 一 次 性 生成 10 
万 个 三 维 正 态 分 布 随机 数 , 这 些 数组 成 了 一 个 100 000 关 3 大 小 的 和 矩阵。 编程 如 下 : 


N= 100000，; 
x0 = [normrnd(2,3,N,1),normrnd( -1,2,N,1),normrnd(0,1,N,1)]; 


【 例 12-22】 将 系数 矩阵 玉 做 Cholesky 分 解 得 到 矩阵 天, 编程 如 下 : 


R=[1 .0 30.4:0.3 1 0 220 4 .02 1: 
工 = Chol(R) ; 


【 例 12-23】 计算 ze XL, 即 可 得 到 10 万 个 符合 上 述 两 表 中 条 件 要 求 的 多 元 正 态 分 
布 随机 数 , 这 些 随 机 数 被 存储 在 一 个 100 000X3 大 小 矩阵 中 。 编 程 如 下 : 


X= XO LDL; 
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将 这 10 万 个 随机 数 画 在 二 维 平 面 上 ,编程 如 下 : 


scatter(x(:,1),x(:,2), 'marker','.', 'sizedata',1) 


运行 程序 ,输出 图 形 如 图 12-25 所 示 。 


图 12-25 多 元 正 态 分 布 的 边缘 分 布 


12.7 统计 图 绘制 


MATLAB 统计 工具 箱 在 MATLAB 丰富 的 绘图 功能 上 又 增添 了 一 些 特殊 的 图 形 表 
现 函 数 。 例 如 ,box 图 用 以 描述 数据 样本 ,也 用 于 通过 图 形 来 比较 多 个 样本 的 均值 ; 正 态 
”概率 图 可 以 从 图 形 上 检验 样本 是 否 为 正 态 分 布 ; 分 位 数 一 分 位 数 图 用 于 比较 两 样本 的 分 
，” ” 布 ; 拟 合 曲 线 图 给 出 当前 数据 点 的 拟 合 曲 线 等 。 

表 12-8 给 出 了 常用 的 几 种 统计 绘图 函数 。 


表 12-8 常用 的 统计 绘图 函数 


为 下 的 每 一 列 绘 制 一 个 box 图 。param]、 


boxplot Rs 0 “|param2 等 设置 图 形 参 数 ,vall .val2 等 为 对 应 ss 丛 向 对 入 
errorbar (和 YL，U, | 给 出 X-Y 图 以 及 由 L 和 UU 规定 识 差 罪 限 的 谍 
RR 差 条 。 误 差 条 与 点 ( 久 ,Y) 上 面 的 距离 为 UI 在 曲线 上 夯 误 
errorbar( X,Y,L) (2 让 ,下面 的 距离 为 L(i)。X 六 ,YL.U 长 度 需 相 | 差 条 
errorbarCY ,L) 同 。symbol 为 一 字符 串 ,规定 线 型 颜色 等 
fsurfht(C ' fun ' ，xlims, |fun 为 用 户 指 定 函 数 ,xlims.ylims 分 别 给 出 工 | 画 函 数 的 交互 轮 
ylims) 轴 与 y 轴 上 的 范围 限制 廊 线 
通过 鼠标 确定 两 端点 在 当前 图 上 绘制 线段 ; | 在 图 中 交互 式 
， gline gline(fig) 


' | 由 在 图 fig 上 画 线段 ; 返回 线段 的 句柄 hh 夯 | 线 
h = gline(fig) 


gname(cases) 


gname 

gname 
ho= gname (cases, line _ 
handle) 

lsline 

lsline I 
h = lsline 
normplott XX) 

normplot | 
h = normplot(X) 

pareto pareto(y, names) 
qqplot( 久 ,了 ) 

qqplot 


qqplot(X,Y ,pvec) 


refcurve |h = refcurve(p) 


rcoplot rcoplot(r, rint) 


refline(slope,intercept) 
refline refline(slope) 

refline 

surfhtt(z) 


surfht 
surfht(x, ysZ) 


weibplot | wblplot(x) 


下 面 分 别人 举例 进行 说 明 ， 
1. box 图 绘制 


cases 为 一 个 字符 串 和 矩阵 。 当 移动 鼠标 确定 需 
做 标记 点 后 , 按 Enter 键 或 Escape 键 ,就 会 在 | ， 
该 点 处 输出 cases 包 舍 的 字符 串 


为 当前 坐标 系 的 每 一 线性 数据 组 绘制 出 其 最 

小 二 乘 拟 合 线 。h 为 线条 句柄 

显示 数据 X 的 正 态 概率 图 。 若 X 为 矩阵 , 则 | 
其 每 一 列 显示 一 条 线 。 若 数据 服从 正 态 分 布 .| 和 下 二 四， 下 
则 图 形 为 线性 ,其 他 分 布 对 应 曲线 2 

将 矢量 y 中 的 每 个 元 素 , 按 元 素数 值 递减 顺序 

给 成 直方 条 ,并 以 names 中 的 名 称 对 直方 条 

进行 标记 

如 果 两 样本 来 自 同一 分 布 , 则 绘 出 的 线 为 直 

线 。 上 默认 值 时 将 位 于 第 一 分 位 数 和 第 三 分 位 | 画 两 样本 的 分 位 
数 间 的 数据 拟 合 绘 制 成 一 条 线 , 矢 量 pvec 可 | 数 一 分 位 数 图 
规定 分 位 数 

p 表示 多 项 式 系 数 和 矩阵, 在 当前 图 中 绘 出 p 代 | 在 当前 图 中 加 
表 的 多 项 式 曲 线 。 hh 为 返回 曲线 句柄 多 项 式 昌 线 
根据 样本 回归 后 
的 残 差 和 置信 区 
间作 出 误差 条 图 


画 统 计 过 程控 制 
的 Pareto 图 


r.rint 来 自负 数 regress 的 输出 ,该 明 数 最 后 
按 数 据 顺 序 给 出 各 数据 点 的 误差 条 


在 图 中 给 出 斜率 为 slope、 截 距 为 intercept 的 

直线 ; 后 一 个 式 中 的 slope 为 一 个 二 元 矢量 ,| 在 当前 坐标 中 夯 
第 一 个 元 素 为 斜率 ,第 二 个 元 素 为 截 距 ; 无 参 | 参考 线 

数 时 ,给 出 最 小 二 乘 拟 合 线 

根据 给 出 的 工 、y、z 数据 ,提供 任意 的 xz、y 的 


画 交 互 轮 廊 线 
坐标 值 上 的 = 的 内 插值 辐 交 互 著 万 线 


从 威 布尔 分 布 ; 则 给 出 的 线 为 直线 


画 威 布尔 概率 图 


在 MATLAB 命令 窗口 中 输入 : 


clc,clear,close all 
xlL = normrnd(5,1,100,1); 
x2 = normrnd(6,1,100,1); 


boxplot([x1,x21], notch’', on') 


争 画 出 带 切 口 的 box 图 


输出 如 图 12-26 所 示 的 box 图 。 
如 图 12-26 所 示 ,图 形 说 明 盒子 的 上 下 两 条 线 分 别 为 样本 的 25% 和 75% 分 位 数 , 中 
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图 12-26 box 图 


” ” 间 的 线 表 示 样 本 中 位 数 。 从 图 中 可 知 ,中 位 数 在 盒子 中 间 , 因 而 两 组 数据 都 大 致 关于 它 
，。 “ 们 的 均值 对 称 。 

z 虚线 表示 样本 的 其 余部 分 ,位 于 盒子 的 上 下 侧 。 

切口 表示 样本 中 位 数 的 置信 区 间 , 默 认 情 况 下 没有 切口 。 此 外 ,还 可 以 用 命令 
boxplot(| xl1 ,x2|], 'notch','on','wWwhisker',1) 标 出 超出 1.0 伴 的 四 分 位 数 距 离 的 样本 奇 
异 点 。 


2， 正 态 概率 图 绘制 
在 MATLAB 命令 窗口 中 输入 : 


clc,clear,close all 
x = normrnd(0,1,50,1): 秆 产生 正 态 随机 数 
h = normplot(x); 


输出 如 图 12-27 所 示 的 正 态 概率 图 。 
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图 12-27 正 态 随机 数 的 正 态 概率 网 


图 形 说 明 : 由 于 样本 是 由 正 态 随机 数 发 生 硕 产生 的 ,因此 其 服从 正 态 分 布 , 改 所 得 的 
概 认 图 呈 线 性 。 芭 加 在 数据 上 的 实 线 为 x 中 数据 的 第 一 和 第 三 分 位 间 的 连 线 ,有 助 于 评 
佑 数据 线性 程度 。 统 
厂 样 本 不 服从 正 态 分 布 , 则 所 得 的 概率 图 有 所 弯曲 ,如 在 MATLAB 命令 窗口 中 分 
输入 : 
算 

Clc,clear, close all 


normplot(x) 


输出 如 图 12-28 所 示 的 正人 态 概 率 图 。 


01 02 03 04 05 06 07 08 09 1.0 
归 据 


图 12-28 均匀 分 布 的 正 态 概率 图 


3. 分 位 数 一 分 位 数 图 的 绘制 
在 MATLAB 命令 窗口 中 输入 : 


clc,clear,close all 


x = normrnd(0,1,100,1); 竺 产生 均值 为 0, 方 差 为 1 的 100 个 正 态 随机 数 
了 = normrnd(0.5,2,50,1); 竺 产生 均值 为 0.5, 方 差 为 2 的 50 个 正太 随机 数 
qqplot(x, vy); 各 作出 分 位 数 一 分 位 数 图 


输出 如 图 12-29 所 示 的 分 位 数 一 分 位 数 图 。 

图 形 说 明 : 由 于 zy 均值 和 方差 均 不 同 , 即 x、y 数据 不 是 来 自 同一 分 布 , 故 所 得 的 
分 位 数 一 分 位 数 图 表现 出 一 定 的 堆 曲 。 

中 间 的 直线 是 将 位 于 第 一 分 位 数 和 第 二 分 位 数 之 则 的 数据 拟 合 绘制 而 成 的 。 

4. 最 小 二 来 拟 合 线 的 绘制 


在 MATLAB 命令 窗口 中 输入 : 


i MATLAB 科 学 计算 


图 12-29 ”均值 方差 不 同 的 两 正 态 分 布 的 分 位 数 一 分 位 数 图 


Clc,clear,close all 


v= [23.45.68 12 12.3 13.8 16 18.8 19.91]1°; 币 输入 一 些 数 据点 

PlottYy + '"', linewidth', 2); 和 绘 出 这 些 数 据点 

lsline; 第 对 这 些 数 据 进 行 最 小 二 科 拟 合 
grid on 


输出 如 图 12-30 所 示 的 最 小 二 乘 拟 合 线 图 。 
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图 12-30 ”最 小 二 乘 拟 合 线 图 


12.8 方差 分 析 


方差 分 析 (analysis of variance,ANOVA) 是 数理 统计 中 常用 的 数据 钼 理 方 法 之 一 ， 
是 工 `\ 农 业 生 产 和 科学 人 研究 中 分 析 试 验 数 据 的 一 种 有 效 的 工具 ,也 是 开展 试验 设计 、 参 数 
设计 和 容 差 设计 的 数学 基础 。 

一 个 复 淋 的 事物 ,其 中 往往 有 许多 因 双 相互 制约 义 相 互 依 存 。 方 差分 析 的 目的 是 通 
过 数据 分 析 找 出 对 该 事物 有 显著 影 啊 的 因 系 、 各 因素 之 间 的 交互 作用 ,以 及 显 闭 影响 因 


素 的 最 佳 水 平等 。 

方差 分 析 是 在 可 比较 的 数组 中 ,把 数据 间 的 总 的 “ 变 差 " 按 各 指定 的 变 差 来 源 进行 分 
解 的 一 种 技术 。 对 变 差 的 度量 ,采用 离 差 平方 和 。 方 差分 析 方 法 就 是 从 总 离 差 平方 和 分 
解 出 可 追溯 到 指定 来 源 的 部 分 离 差 平方 和 。 下 面 介 绍 几 种 简单 情况 的 方差 分 析 。 


12.8.1 单 因 系 试 验 的 方 夫 分 析 


单 因 系 试 验 的 方差 分 析 是 指 试验 中 只 有 一 个 因 双 发 生 改 变 。 在 MATLAB 中 , 单 因 
紊 试验 的 方差 分 析 可 用 果 数 anoval() 实 现 。 

anoval() 执 行 单 因素 试验 的 方差 分 析 来 比较 两 组 或 多 组 数据 的 均值 , 它 返 回 厚 假设 
样本 来 日 相同 的 总 体 或 来 日 具有 相同 的 均值 的 不 同 总 体 的 PP 什 。 上 有 具体 调用 格式 如 下 : 

(1) P =anoval(X)。 将 算 阵 天 中 的 每 一 列 作 为 一 个 独立 样本 ,用 因数 判断 这 些 样 本 
的 均值 是 否 相 同 ,并 返回 关 值 .ANOVA 表格 和 和 矩阵 羡 各 列 的 箱 线 图 。 

(2) p=anoval(X,group)。 用 group 中 的 值 标 记 六 样 本 的 箱 线 图 。group 的 每 一 行 
包含 天 相应 列 的 标记 值 。 因 此 group 的 长 度 须 等 于 的 列 数 。 

(3) p =anoval( 和 ,groupy, 'displayopt')。 用 displayopt 确定 是 否 要 作出 ANOVA 的 
表格 和 样本 的 箱 线 图 。 当 displayopt ='on' (默认 值 ) 时 ,给 出 表格 和 箱 线 图 ; 当 displayopt = 
‘off' 时 , 则 不 给 出 表格 和 逢 线 图 。ANOVA 表格 共 包 含 5 列 ,每 列 的 意义 如 下 。 

中 第 1 列 为 source 项 , 即 方差 来 源 ; 

@ 第 2 列 给 出 每 一 项 来 源 的 平方 和 SS; 

@) 第 3 列 给 出 每 一 项 来 源 的 日 由 度 df,. 即 包含 的 数据 总 效 ; 

出 第 4 列 给 出 每 一 项 来 源 的 均 方 MS =SS/ df; 

四 第 5 列 给 出 正比, 也 就 是 MS 的 比率 。 

该 国 数 显示 的 第 二 幅 图 为 算 阵 X 每 一 列 的 箱 线 图 。 

【 例 12-24】 将 抗生素 注入 人 体会 产生 抗生素 与 血浆 重 日 结合 的 现象 ;以致 减 少 了 
药 效 。 表 12-9 列 出 了 5 种 常用 的 抗生素 注入 到 牛 的 体内 时 ,抗生素 与 血浆 蛋白 结合 的 百 
分 比 。 试 检验 这 些 百 分 比 的 均值 有 无 显 半 的 差异 。 

表 12-9 各 抗生素 与 血浆 蛋白 结合 的 特 分 比 


至 二 来 | 四环素 | 逢 圭 来 | 乞 雪 来 | 乞 二 来 


29. 6 5.8 21.6 29.2 


在 MATLAB 命令 窗口 中 输入 : 


Clce,clear,close all 

=[29.6,.27.3,.5.8,21.6,29. 2;24. 3. 32.6,6. 2,.1171. .932.8;28.5,30.8,11.0,.18.3,.25.0;32.0 
34.8,.8.3,19.0,24.2|]; 

group 一 [' 青 茯 素 ';' 四 环 素 ';' 链 等 末 ';' 红 轮 末 ';' 乌 稚 素 ']; 

p= anoval (x, group) 
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输出 结果 如 下 : 


Pp 一 
6.7398e— 08 


由 于 6.7398e-08, 远 小 于 0. 01 , 故 可 以 判断 这 些 抗 生 素 的 均值 具有 显著 差异 。 
ANOVA 表格 和 瑟 箱 线 图 如 图 12-31 和 图 12-32 所 示 。 


二 Fgure 1: One-way ANOVA 
文件 旧 。 编 坊 在 ) 查看 (MV) 插 人 轴 工具 四 点 面 ID) 窗口 (W) 帮助 (H) 


Prob2F 


370.206 4088 下 了 39785 一 人 日 
9, O33 


图 12-31 单 因 素 方 差分 析 的 ANOVA 表格 


| Figure 2 
立 忻 (月 妨 宫 人 E) 看 者 插入 中 工具 中 ” 虑 面 iD) 窒 口 (W) 帮助 (H) 
站 本 加 二 | RDO 和 Rr | 口 因 | mm 加 


图 12-32 和 矩阵 处 箱 线 图 


12.8.2 双 因 系 试 验 的 方 大 分 析 


MATLAB 中 双 因 系 试 验 的 方差 分 析 用 肾 数 anova2() 实 现 。 其 调用 格式 如 下 : 
p =anova2(X, reps) 


它 执行 平衡 的 双 因 系 试 验 的 方差 分 析 ,来 比较 下 中 两 个 或 多 个 列 或 行 的 均 信 。 不 同 
列 的 数据 代表 某 一 因素 的 差异 :不 同行 的 数据 代表 态 一 因 际 的 差 开 。 如 采 每 行列 对 有 
多 于 一 个 的 观察 点 , 则 变量 reps 指出 每 一 单元 观察 点 的 数目 ,每 一 单元 包含 reps 行 。 

(1) reps 默认 值 为 1, 此 时 anova2 返回 的 p 值 品 量 包 含 两 个 值 ,分 别 为 原 假 设 因 系 
A 作用 的 列 回 量 来 自 一 个 总 体 的 pz 值 和 因素 B 作用 的 行 回 量 来 日 一 个 总 体 的 pb 值 。 

(2) 大 reps 大 于 1 时 ,返回 的 p 问 量 包含 3 个 值 。 第 3 个 人 为 原 假 设 因 系 人 A 和 B 共 
同 作用 的 所 有 元 系 来 日 一 个 总 体 的 bp 值 。 

(3) 函数 还 给 出 ANOVA 表格 。 

【 例 12-25】 在 某 种 金属 材料 的 生产 过 程 中 ,对 热处理 温度 (因素 B) 与 时 间 ( 因 系 A) 
各 取 两 个 水 平 ,产品 强度 的 测定 结 采 (相对 值 ) 如 表 12-10 所 示 。 

表 12-10 不 同 温度 (B)、 时 间 (A) 下 产品 强度 


| = | 
温度 Bl B2 
时 间 


在 同一 条 件 下 每 个 试 驼 重复 两 次 。 设 各 水 平 措 配 下 强度 的 总 体 服从 正 态 分 布 且 方 
差 相 同 ,各 样本 独立 。 问 热处理 温度 .时间 以 及 这 两 者 的 交互 作用 对 产品 强度 是 否 有 显 
著 的 影响 ( 取 a =0. 05)? 

用 anova2() 图 数 求 解 , 在 MATLAB 命令 窗口 中 输入 : 

clc,clear,close all 


xX= [38.0,47.0;38.6,44.8;45.0,42.4;43.8,40.8]; 
p= anova2 (x,2) 


输出 结 来 如 下 : 
Pp = 
0. 0340 0. 3009 0.0024 


同时 输出 如 图 12-33 所 示 的 ANOVA 表格 。 

由 结果 知 第 一 个 p 值 代表 列 样本 均值 相同 假设 的 p 值 , 即 反 映 了 了 B 因素 (温度 因 系 ) 
的 野 啊 。 由 于 pp(1) 很 小 , 故 可 得 B 因 双 对 产品 强度 影 啊 显赫 。 

同 理 可 得 A 因 系 (时 则 因 系 ) 对 产品 强度 影 啊 不 显 关 ( 因 p(2) 二 0.05),A、B 因 系 的 


LD 
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过 | Figure 1: Two-way ANOVA = 


文件 (日 ” 久 辐 下) ” 童 看 (VW) 植 入 中 ” 工具 中 点 面 ID) 窗 D(MW) 帮助 (H) 
ANOVA Table 


F Prob}yF 


li 82 1002 0 034 

i 62 LA 0. 009 
S08 47.09 0 0024 
1 i5 


图 12-33 ” 双 因 素 方 差分 析 的 ANOVA 表格 


交互 作用 影响 更 为 显著 (p(3) 一 0.01)。 
12.9 组 特 卡 罗 方 法 


蒙特 卡 罗 (Monte Carlo) 方 法 计算 的 结果 收 钱 的 理论 依据 来 自 于 大 数 定律 ,是 结果 浙 
进 地 (asymptotically) 服 从 正 态 分 布 的 理论 依据 是 中 心 极限 定理 。 

蒙特 卡 罗 方 法 计算 要 进行 很 多 次 抽样 , 才 会 比较 好 地 显示 出 来 ,如 果 和 蒙特 卡 罗 计 算 
结果 的 某 些 高 阶 距 存在 ,即使 抽样 数量 不 太 多 ,这 些 渐进 属性 也 可 以 很 快 达 到 。 


1. 蒙特 卡 罗 数 值 积 分 


计算 一 个 定 积分 ,如 下 f(z)dzx, 如 果 能 够 得 到 f(z) 的 原 函 数 FCz) ,那么 直接 由 表 


达 式 F(x1) 一 F(zxo) 可 以 得 到 该 定 积 分 的 值 。 但 是 在 很 多 情况 下 ,由 于 /(z) 太 复杂 , 导 
致 无 法 计算 得 到 原 函 数 F(x) 的 显示 解 ,这 时 就 只 能 用 数值 积分 的 办 法 ， 

常规 的 数值 积分 方法 是 在 分 段 之 后 ,将 所 有 的 微 元 面积 全 部 加 起 来 ,用 这 个 面积 来 
近似 函数 /(zx) 与 x 轴 围 成 的 面积 。 该 做 法 当然 是 不 精确 的 ,但 是 随 着 分 段 数 量 增加 , 误 
差 将 减 小 ,近似 面积 将 逐渐 逼近 真实 的 面积 。 

蒙特 卡 罗 数 值 积 分 方法 和 上 述 类 似 。 差 别 在 于 ,蒙特 卡 罗 方 法 中 ,不 需要 将 所 有 方 
柱 的 面积 相 加 ,而 只 需要 随机 地 抽取 一 些 函 数值 ,将 它们 的 面积 累加 后 计算 平均 值 即 可 。 
通过 相关 数学 知识 可 以 证 明 , 随 着 抽取 点 增加 ,近似 面积 也 将 逼近 真实 面积 。 

在 金融 产品 定价 中 ,大 多 数 问题 求 基于 某 个 随机 变量 的 函数 的 期 望 值 。 考 虑 一 个 欧 
式 期 权 , 假 定 已 知 在 期 权 行 权 日 的 股票 服从 某 种 分 布 ( 理 论 模型 中 一 般 是 正 态 分 布 ), 那 
么 用 期 权 收 益 在 这 种 分 布 上 做 积分 求 期 望 即 可 。 


2. 蒙特 卡 罗 随 机 最 优化 


地 特 卡 岁 在 随机 最 优化 中 的 应 用 包括 模拟 退火 (simulated annealing)、 进 化 策略 
(evolution strategy) 等 。 例 如 已 知 某 困 数 , 求 此 盟 效 的 最 大 值 :, 那 么 可 以 不 断 地 在 该 果 数 
定义 域 上 随机 取 点 ,然后 用 得 到 的 最 大 的 点 作 为 此 唤 数 的 最 大 但 。 这 个 例子 实 夺 也 是 随 


机 数值 积分 , 它 等 价 于 求 此 函数 的 无 穷 阶 范 数 (co-Norm) 在 定义 域 上 的 积分 。 
3. 大 规模 蒙特 卡 罗 实 验 


从 理论 来 说 , 当 寺 特 卡 罗 模 拟 次 数 达 到 无 穷 大 时 ,所 得 的 结果 将 变 成 没有 误差 的 确 
定 值 。 但 是 ,由 于 计算 机 内 存 容 量 的 限制 ,程序 一 次 性 能 做 的 蒙特 卡 罗 模 拟 的 次 数 是 有 
限 的 。 这 个 问题 在 内 存 消 耗 巨 大 的 向 量化 代码 中 体现 更 为 明显 。 

【 例 12-26】 给 定 曲 线 y= 二 2 一 zx” 和 曲线 y = 二 x ,曲线 的 交点 为 Pi( 一 1,1)、Ps(1,1)。 
曲线 围 成 平面 有 限 区 域 .用 蒙特 卡 罗 方 法 计算 区 域 面积 。 编 程 如 下 : 


4 
栈 
概 
统 
计 
分 
布 
计 
算 


clc,clear,close all 

P= rand(10000,2); 

xX=2%P(:,1)-—1: 

Y=2%*P(:,2); 

IIT= find(y<=2— x. "2EY.°3>= Xx.*2); 
M= length(II) ; 

S=4x M/10000 

plot(x(II),yY(II), 'g. ') 


二 
之 .1376 


得 到 相应 的 图 形 如 图 12-34 所 示 。 


沿 淹 -0.8 -0.6 -0.4 -0.2 0 02 04 06 0.8 1.0 
图 12-34 面积 求解 


【 例 12-27】 计算 | zy dzdy, 其 中 口 为 所 围 区 域 的 边界 ,具体 为 (一 1,1).(4.,2)， 


被 积 函 数 在 积分 区 域内 的 最 大 值 为 16。 积 分 值 是 三 维 体积 ,该 三 维 图 形 位 于 立方 体 
区 . 域 : 

1 
内 ,立方 体 区 域 的 体积 为 192。 


r---------- MATLAB 科 学 计算 


编程 如 下 : 


clc,clear,close all 

data = rand( 100000,3); 

x=4x* data(:,1); 

v=—1+3xdata(:,2); 

\ z= 16 x data( :,3); 

' En 
’ M = length(II) ; 

V= 192 x M/10000 

plot(x(II),Y(II)，'go') 


运行 程序 ,输出 结果 如 下 : 


年 二 
76.7808 


得 到 相应 的 图 形 如 图 12-35 所 示 。 


2.0 


"I 
图 12-35 三维 体 积 求 解 


【 例 12-28】 用 蒙特 卡 罗 方 法 计算 ke 十 y 二 z*)drdydz, 其 中 ,积分 区 域 是 由 = 一 


Vx 十 y 和 <z 王 1 所 围 成 。 被 积 哺 数 在 积分 区 域 上 的 最 大 值 为 2。 所 以 有 四 维 超 立方 体 : 
0 2 
编程 如 下 : 


| clc,clear,close all 
| P= rand(10000, 4):; 

' x=—-1+2xP(:,1); 
' v=—-1+2xP(:,2); 
| z 二 EP(:,3)-: 

| u=2% P(:,4)-: 


市 夫人 
M= length(1II):; 

V=8 x* M/10000 

x1l =—1:0.1:1; 

yl = x]; 

[X1 Y1L] = meshgrid(x]l, v1); 

z1 = gqrt{(XLl "2+ Tl “2): 

n= sizelxl1):;: 

z2 = ones(n(1,2),n(1,2)); 
surf(xl, vl,z1) 

hold on 

surf(xl,v]l,z2) 

figure, plot(x(II1), vy(II), 'go') 


运行 程序 ,输出 结 采 如 下 : 


J 
0.9088 


得 到 相应 的 图 形 如 图 12-36 和 图 12-37 所 示 。 
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图 12-36 ” 围 成 的 体积 图 12-37 平面 散 点 图 


【 例 12-29】 用 蒙特 卡 罗 方 法 计算 z 宇 Vr 十 y 且 z 硅 1 十 V1 一 x 一 y 的 冰激凌 锥 
体 , 它 内 含 体积 为 8 的 六 面体 0 二 {C(x,y;z) | 一 1 和 zs 委 1, 一 1] 委 vv 委 1,0 委 z 委 2})。 由 于 
rand 产生 0 到 1 之 间 的 随机 数 , 所 以 zx.y.z 随机 数 产 生 程序 如 下 : 


xX=2x*Iand 一 1; 产 生 一 1 到 1 之 间 的 随机 数 
Vy 二 2%*Iand 一 1; 产 生 一 1 到 1 之 间 的 随机 数 
z=2x% Iand; 产 生 0 到 2 之 间 的 随机 燥 


NN 个 点 均匀 分 布 于 六 面体 中 , 锥 体 中 占有 芭 个 , 则 锥 体 与 六 面体 体积 之 比 近 似 为 
| Y om 
772 : N,B ~ 
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绘制 该 冰 油 阎 锥 ,编程 如 下 : 


clc,clear,close all 
多 function icecream(m,n) 
% if nargin== 0, 
m= 20; 
n= 100; 
竺 end 
t= linspace(0,2 x pi,n); 
r= linspace(0,1,m).; 
X= I COS( 七 ) ; 
y= I'x sin(t); 
zl1 = sgqrt(x.*2+ vyv.*2).; 
z2=1+sqrt(l1+ eps — Xx.“2— vy.”2); 
X= [x;x]:Y= [Y7Y] ， 
w= [|z1;z2|]: 
mesh(X, Y, 2Z) 
view(0,— 18) 
colormap([0 0 1]1),axis off 


运行 程序 ,输出 结果 如 图 12-38 所 示 。 


图 12-38 ”冰激凌 模型 


如 图 12-38 所 示 ,该 冰激凌 模型 体积 求解 如 下 : 
V = ja 十 VIL 一 和 一 一 ME Ty dxrdy, 用 :人 KZ | 二 Ty 过 1} 
D 
设 工 二 rsinGcosgp, y=—=rsinfsing, z= rcos0, 则 该 体积 转化 为 一 定 积 分 如 下 : 


2r 到 2cosb 
V = | de | sing | rdr 
0 0 0 
编程 如 下 : 


clc,clear,close all 
$ function [gerror] = MonteC(L) 
向 if nargin == 0, 
LDL=7; 
宅 end 


NM=10000 

fork=1:L 
P= rand(N,3):; 
X= 2Pl:,1)-—1; 
y=2x%P(:,2)—1; 
z=2xP(:,3); 
RZ2= Xx."2+Y."2; 
R= sqrt(R2); 
II= find(z>= R&z<=1+sqrt(1— R2)); 
m= length(II); 
q(k)= 8 x m/N; 

end 

error=q— pi 


figqure, plot(x(II), y(II), 'go') 


运行 程序 ,输出 结果 如 下 : 


全 LIOL 二 
— 0.0120 一 心 . 0296 D0. 0096 一 0.0544 一 0.0400 0.0288 0.0096 


输出 图 形 如 图 12-39 所 示 。 


-1.0 一 一 此 20. : 
-1.0 -0.8 -0.6 -0.4 -02 0 02 04 06 0.8 1.0 
图 12-39 x-y 平面 映射 


本 章 小 结 


概率 分 布 是 概率 论 的 基本 概念 之 一 ,用 以 表述 随机 变量 取 值 的 概率 规律 。 为 了 使 用 
的 方便 ,根据 随机 变量 所 属 类 型 的 不 同 ,概率 分 布 取 不 同 的 表现 形式 。 人 研究 随机 试验 , 仅 
知道 可 能 发 生 哪 些 随机 事件 是 不 够 的 ,还 需 了 解 各 种 随机 事件 发 生 的 可 能 性 大 小 ,以 揭 
示 这 些 事 件 内 在 的 统计 规律 性 ,从 而 指导 实践 。 这 就 要 求 有 一 个 能 够 刻画 事件 发 生 可 能 
性 大 小 的 数量 指标 ,该 指标 应 该 是 事件 本 号 所 固有 的 ,上 且 不 随 人 的 主观 意志 而 改变 ,人 们 
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各 之 为 概 认 (probability)，。 
壹 特 卡 罗 方 法 的 实质 是 通过 大 量 随 机 试验 ,利用 概率 论 解 决 问 题 的 一 种 数值 方法 。 
索 特 卡 罗 算 法 常委 应 用 于 大 多 工程 近似 计算 中 ,对 于 面积 .体积 、 期 权 等 问题 计算 ,过 特 
卡 罗 算 法 因 其 计算 方便 ,近似 交 近 精度 可 由 用 户 目 己 设 定 ; 因 此 , 寺 特 卡 岁 算法 适应 


性 广 。 


在 实际 问题 中 ,经 常 需要 研究 两 组 多 重 相 关 变 量 间 的 相互 依赖 关 
系 ,并 研究 用 一 组 变量 去 预测 另 一 组 变量 ,除了 最 小 二 乘 准 则 下 的 经 
典 多 元 线性 回归 分 析 ,提取 自 变 量 组 主 成 分 的 主 成 分 回归 分 析 等 方法 
外 ,还 有 近年 发 展 起 来 的 俩 最 小 二 乘 回 归 方 法 。 本 章 基 于 俩 最 小 二 乘 
方法 ,结合 理论 联系 实际 案例 ,利用 MATLAB 应 用 偏 最 小 二 乘 方法 。 
学 习 目 标 : 
熟练 掌握 MATLAB 编程 表示 方法 ; 
。 融 练 运用 MATLAB 求解 偏 最 小 二 乘 模型 ; 
。 熟练 掌握 使 用 MATLAB 工具 解决 简单 工程 问题 等 。 


13.1 偏 最 小 二 乘 回归 


考虑 pp 个 变量 yiyyz yy39 "syYp 与 ry 个 上 自 变 量 XT1yX2yT39 "Tm 
的 建 模 问题 。 偏 最 小 二 乘 回归 的 基本 做 法 是 首先 在 自 变量 集中 提出 
第 一 成 分 i (ni 是 rzrz:za ,zm 的 线性 组 合 , 且 尽 可 能 多 地 提取 原 
日 变量 集中 的 变异 信息 ); 同时 在 因 变 量 集 中 也 提取 第 一 成 分 ,并 
要 求 刀 与 wi 相关 程度 达到 最 大 。 然 后 建立 因 变 量 yi ,yz,ys，…，yp 
与 11 的 回归 ,如 果 回 归 方 程 已 达到 满意 的 精度 , 则 算法 中 止 。 否 则 继 
续 第 二 对 成 分 的 提取 ,直到 能 达到 满意 的 精度 为 止 。 若 最 终 对 自 变 量 
集 提 取 -个 成 分 三 :ta: 上: 俩 最 小 二 乘 回归 将 通过 建立 ya,ysz， 
ya 本 ttt "st; 的 回归 式 , 然 后 再 表示 为 yyeyv ys， ,yp 
与 原 自 变量 的 回归 方程 式 , 即 偏 最 小 二 乘 回 归 方 程式 。 

为 了 方便 起 见 , 不 妨 假 定 刀 个 因 变 量 yiyyzyya， :yp 与 到 个 目 
变量 X11 ,Xz ,XT3，"** ,Tm 均 为 标准 化 变量 。 因 变量 组 和 目 变 量 组 的 nn 次 
标准 化 观测 数据 阵 分 别 记 为 


| V11 Vis | E11 sa 


| Yn]l 业 三 天 Vnp | | 二 昌 硬 ep 


偏 最 小 二 乘 回归 分 析 建 模 的 具体 步骤 如 下 : 
(1) 分 别提 取 两 变量 组 的 第 一 对 成 分 ,并 使 之 相关 性 达 最 大 。 假 
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设 从 两 组 变量 分 别提 出 第 一 对 成 分 为 所 与 三 和 是 自 变量 集 X 一 (zl,zzy za …zn)il 的 
线性 组 合 轴 一 zz 十 zlizzz 十 … 十 zz 一 miXi ul 是 因 变 量 集 了 一 (yl,yz,，…，yp) 1 
的 线性 组 合 ,xa 一 zy 十 mzyz 十 … 十 my 一 zz1Y7Y。 为 了 回归 分 析 的 需要 ,要 求 : 

上 与 xi 各 上 自尽 可 能 多 地 提取 所 在 变量 组 的 变异 信息 ; 

旬 让 与 的 相关 程度 达到 最 大 。 

由 两 组 变量 集 的 标准 化 观测 数据 阵 E。 和 ,可 以 计算 第 一 对 成 分 的 得 分 回 量 , 记 为 


1 JIU 
(Xl Wie | OL [11 | 
fi = Eow! = : 这 : 加 中 站 
[nl ”Tm TUTm _ Linl J 
| Vil 生生 V1ip | | TL U1 
Wi 一 Fovw= | 1 , | 〖 一 | | 
[Vnl ”Yn ) LUlp nl 
第 一 对 成 分 与 uw 的 协 方差 Cov(t1,ui) 可 用 第 一 对 成 分 的 得 分 向 量 4 的 内 积 
来 计算 。 故 而 ,以 上 两 个 要 求 可 化 为 数学 上 的 条 件 极 值 问题 : 
(F100) = (Eowi: Fovwi) = wikEo Fov —> max 
4wiw 二 wl ”=1 
| oro, = = 


利用 拉 格 朗 日 乘 数 法 ,问题 化 为 求 单位 向 量 w 和 ml, 使 0 一 mwiEoFool 一 最 大 。 问 
题 的 求解 只 需 通 过 计算 mxXm 和 矩阵 MM 二 EBE3FoFiE。 的 特征 值 和 特征 向 量 , 且 M 的 最 大 特 
征 值 为 91 ,相应 的 单位 特征 向 量 就 是 所 求 的 解 wi ,而 zi 可 由 wi 计算 得 到 


TT] 一 二 


| 
(2) 建立 yi yao Vy 9 yp 对 ti 太 Ti Tm 的 回归 。 假定 回归 模型 为 
| 一  @@L 十 五 ; 


LF 二 让 所 十 局， 
式 中 ,一 (alyaltz am) :及 一 (B11;Biz，…… ,Bis) 分 别 是 多 对 一 的 回归 模型 中 的 参 
效 回 量 ; 五 和 本 是 残 差 阵 。 
回归 系数 器 量 @i : 甩 的 最 小 二 乘 估计 为 


_ Et 
| 吉首 
Fo ti 
lk 
称 @1 ,为 模型 效应 负荷 量 ， 
(3) 用 残 差 阵 E, 和 下 | 代替 E。 和 FF 重复 以 上 步骤 。 
记 E 一 人 i ef ,了 F 一 人 i 了; 则 残 差 阵 EB 一 Eo 一 Eo,Fi 一 Fo 一 FP. pe Fi, 中 元 素 
的 绝对 值 近似 为 0, 则 认为 用 第 - -个 成 分 建立 的 回归 式 精度 已 满足 需要 ,可 以 停止 抽取 


成 分 。 否 则 用 残 差 阵 El1 入 代 蔡 五 。 和 开 o 重复 以 上 步骤 即 得 


Wz — (Tal ,Te Ta ) '; Uz 一 (Uzl Uz2 »*** "Upp )T 
分 别 为 第 二 对 成 分 的 权 数 。 而 tz 二 Biwz ,ta 一 us 为 第 二 对 成 分 的 得 分 向 量 。 
Ei 2 


@: 一 EE : 雇 一 一 下 2 | 7 分 别 为 X,Y 的 第 二 对 成 分 的 全 何 量 。 这 时 有 


0 一 fi al EL a FE; 


tm Pitp+ir: 
(4) 设 nXXm 数据 阵 EEo 的 秩 为 fr 三 (一 1 mn': 则 存在 rr 个 成 分 ti ,tz st3，"… ,t,， 使 得 


(Eo= 万 有 十 fo 有 十 … 十 志 要 :十 五 , 


[Fo = ARERR p +F 

把 #& 二 wazi 十 Twiz Xz 十 十 winxm(kR 二 1,2,3," 7) ,代入 Y= 1 tz (32 + sa 全 去 B-， 

即 得 户 个 因 变 量 的 依 最 小 二 乘 回 归 方 程式 
Yi 一 ChTI 十 Caaz 十 多 十 CEmy 1= 1,2,3,"" ,7 

(5) 区 叉 有 殖 性 检验 。 一 般 情 况 下 , 俩 最 小 二 乘法 并 不 震 要 选用 和 存在 的 天 个 成 分 三 ， 
tz ,zt 来 建立 回归 式 , 而 像 主 成 分 分 析 一 样 , 只 选用 前 个 成 分 CC 二 ~), 即 可 得 到 预 
测 能 力 较 好 的 回归 模型 。 对 于 建 模 所 需 提取 的 主 成 分 个 数 1, 可 以 通过 交叉 有 效 性 检验 
来 确定 。 

每 次 舍 去 第 i 个 观测 (二 1,2,3,…*,n), 用 余下 的 n 一 1 个 观测 值 按 偏 最 小 二 乘 回归 
方法 建 模 , 并 考虑 抽取 有 个 成 分 后 拟 合 的 回归 式 , 然 后 把 使 去 的 第 i 个 观测 点 代入 所 拟 合 
的 回归 方程 式 , 得 到 yj;(j 二 1,2,3,…, 记 ) 在 第 i 个 观测 点 上 的 预测 值 y cw; ( 产 ) 。 

对 i 一 1,2,3,…,n 重复 以 上 的 验证 , 即 得 抽取 太 个 成 分 时 第 j 个 因 变量 yj(j 一 1,2， 
3,…,p) 的 预测 误差 平方 和 为 


p;(h) 一 > ys — Dos hs, (= 1,.2.3,...p) 
YY 一 (yyyz，… yp)! 的 预测 误差 平方 和 为 
p(h) = CY 

另外 ,再 采用 所 有 的 样本 点 , 拟 合 含有 个 成 分 的 回归 方程 。 这 时 , 记 第 i 个 样本 点 的 

预测 值 为 5; (1) , 则 可 以 定义 yj 的 误差 平方 和 为 
SS ,Ch) = PD — $y Ch))? 
定义 Y 的 误差 平方 和 为 
SS(h) — YSS,h) 

当 ph) 达 到 最 小 值 时 ,对 应 的 有 即 为 所 求 的 成 分 个 数 。 通常, 总 有 ph) 大 于 
SS ,而 SS(h) 则 小 于 SS(h 一 1)。 因 此 ,在 提取 成 分 时 ,总 希望 比值 sc 一 越 小 越 
好 。 一 般 可 设 定 限制 值 为 0.05, 即 当 


MATLAB 科 学 计算 


pih) 
SS (CO—1) 


增加 成 分 i 有 利于 模型 精度 的 提高 。 或 者 反 过 来 说 , 当 scer 2 一 0.95? 时 ,就 认 


为 增加 新 的 成 分 ti :对 减少 方程 的 预测 误差 无 明显 的 改善 作用 。 


" I i MW ~ y ph) ws 二 了 JE 一 I ee 
为 此 ,定义 交叉 有 效 性 为 Qi 一 1 一 5 多 全 ,这 样 ,在 建 模 的 每 一 步 计算 结束 前 , 均 


进行 交叉 有 效 性 检验 。 如 果 在 第 疡 步 有 Qi 一 1 一 0.95 一 0. 0975, 则 模型 达到 精度 要 求 ， 
可 停止 提取 成 分 ;: 若 Qi 三 0. 0975 ,表示 第 hh 步 提取 的 有 ,成 分 的 边际 贡献 显著 ,应 继续 第 
二 1 沸 订 完 。 


< (1 一 0.05) = 0.95° 


13.2 仿 最 小 二 乘 案 例 分 析 


【 例 13-1〗】 采用 如 表 13-1 所 示 的 体能 训练 的 数据 进行 偏 最 小 二 乘 回归 建 模 。 在 这 
个 数据 系统 中 被 测 的 样本 点 ,是 某 健 身 俱 乐 部 的 20 位 中 年 男子 。 被 测 变量 分 为 两 组 。 
第 一 组 是 身体 特征 指标 和 ,包括 体重 .腰围 .脉搏 。 第 二 组 变量 是 训练 结果 指标 了 ,包括 单 
杠 .弯曲 .跳高 。 


表 13-1 体能 训练 数据 


So 下 | 站 ty| 


表 13-2 给 出 了 这 6 个 变量 的 简单 相关 系数 窍 阵 。 从 相关 系数 失 阵 可 以 看 出 ,体重 己 
腰围 是 正 相 关 的 ; 体重 .腰围 与 脉搏 负 相 关 :; 而 在 单杠 ` 索 曲 与 跳 遍 之 轩 是 正 相 关 的 。 从 
两 组 变量 间 的 关系 看 : 单 丁 .弯曲 和 跳高 的 训练 成 绩 与 体重 .腰围 负 相 关 , 与 脉搏 正 相 关 。 
表 13-2 相关 系数 和 矩阵 


皮尔 和 森 术 


SIE. 
(1l1-tailed) 


腰围 1. 000 


op 


村 [ 


0. B870 


团 


MATLAB 程序 如 下 : 


Clc 竺 清 屏 
clear Ba1L]:; 种 删除 workplace 变量 
close all.;. 竺 关 撞 显示 图 形 窗 口 
format long 

pz=|[1931 36 50 5 162 60 

189 .37 S52 2 110 60 

193 3 58 12 101 101 

162 35 pb 12 105 37 

189 35 46 13 155 586 

182 36 56 4 101 42 

211 38 56 8 101 38 

167 34 60 6 125 40 

176 31 74 15 200 40 

154 33 S56 17 251 250 

169 34 50 17 120 389 

i166 33 52 13 210 12 

154 34 64 14 215 105 

247 46 50 1 50 50 

193 36 46 6 70 31 

202 37 62 12 210 120 

176 37 54 4d 60 25 

157 32 52 11 230 80 

i156 33 54 12 225 “73 

138 33 DB 2 110 43|]; 


mu = meanl( pz); 


委 求 均值 
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sig= std(pz); 
II = Corrcoef(pz):; 
data = zscore( pz); 
n= 23。 
m= 3; 
x0= pz(:,l1:n);v0 = pz(:,n+1:end); 
e0 = data(:,l1:n);f0= data(:,n+ 1:end); 
num= size(e0,1): 
chg = eye(ln); 
for i=1:n 
和 计算 wwx 和 七 的 得 分 向 量 
matrix= e0' x £f0 x f0' x e0: 
[vec,val] = eig(matrix); 
val = diag(val ); 
[val, ind| = sort(val, 'descend'); 
w(:,1i) = vec(:,ind(1)).; 
w_ star(:,i)= chgxw(:,1); 
t(:,1) = e0 x w(:,1); 
alpha = e0' x t(: ,i)/(t(:,1i)'xt(:,2)); 
chg = chg* (eye(n) — w(:,i) x alpha'); 
e=e0—t(:,1i) x*alpha'; 
ED = e; 
秆 计算 ss(iy 的 值 
beta = [t(:,1:1i),onesinom,1) |]\f0:; 
beta(end,:)=|[|]:; 
cancha = £f0—t(:,1:i) * beta; 
ss(i) = sum(sum(cancha.*2)): 
竺 计算 p(i) 
for ] 三 :nom 
二 1 三 十 ( :， 工 : 工 );7 王 1 = £0; 
she t=t1l(j,:)}) ;she f=f1(j,:); 
Ea 
betal = [1 ones(noam 一 1 1)]vEL， 
betal(end,:)}=[]: 
cancha = She f— she tx betal.; 
p_i(j) = sum(cancha. “2); 
end 
p(i) = sum(p_ i); 
ji 琅 立 半 1 
Q bh2(i)=1-p(i)/ss(i— 1); 
else 
QO h2(1)=1; 
end 
if © h2(i)<0.0975 


i 
break 
end 
end 


fprintE( ' 提 出 的 成 分 个 数 工 = 多 d',1); 


币 求 标准 差 

竺 求 相 关系 数 纸 阵 
秆 数据 标准 化 

秆 Nn 且 自 变量 的 个 数 
多 mn 是 因 变 量 的 个 数 


名 求 样本 点 的 个 数 
沼 W 到 wx 变换 和 矩阵 的 初始 化 


名 求 特征 值 和 特征 向 量 

和 提出 对 角 线 元 素 

各 降序 排列 

竺 提出 最 大 特征 值 对 应 的 特征 向 量 
秆 计算 wx 的 取 值 

名 计算 成 分 ti 的 得 分 

竺 计算 alpha i 

秆 计算 Ww 到 wx 的 变 搁 算 阵 

当 计 算 残 差 矩阵 


当 求 回归 方程 的 系数 

委 删除 回归 分 析 的 常数 项 
币 求 残 差 矩 阵 

第 求 误 差 平 方 和 


% 把 会 去 的 第 j 个 样本 点 保存 起 来 
当 删除 第 j 个 观测 值 

名 求 回归 分 析 的 系数 

当 删 除 回归 分 析 的 常数 项 

$$ 求 残 差 向 量 


beta z= [t(:,1:r),ones(num,1) 1\f0; 竺 求 立 美 于 七 的 回 娄 系数 
beta zfend,:)=[]; 多 删除 常数 项 
xishu=w star(:,1:r) * beta z; 当 求 了 Y 关 于 和 X 的 回归 系数 , 且 是 针对 标准 数据 的 回归 系数 


和 大 一 列 是 一 个 回归 方程 
mu X= mu(l:n);mu y= mu(n+1:end).; 
siqg X= sig(l:n);sig y= sig(n+ 1:end); 
for i1=1:m 
ch0(i) = mu_y(i) 一 mu x./sig xx sig_y(i) x xishu(:,i); 多 计算 原始 数据 的 回归 方程 的 


| 


for 1i=1:m 


xish( :,i) = xishu(:,i)./sig x'x sig y(i); 名 计算 原始 数据 的 回归 方程 的 系数 ,每 一 列 


是 一 个 回归 方程 
end 
sol = [ch0 ;xish] 第 显示 回归 方程 的 系数 ,每 一 列 是 一 个 方程 ,每 一 列 的 第 一 个 数 是 党 项 


wl = w(:,1) 

Ww2 = w(:,2) 

wxl] =w star(:,1) 

Wx2 = Ww star(:,2) 

上 EL = El: .1)" 

七 zx 三 志和 

beta z 第 上 归 系 数 


运行 程序 ,得 到 相应 计算 结果 。 计 算 结 果 只 要 提出 两 个 成 分 和 tz 即 可 ,交叉 有 效 
性 Qi 二 一 0.1969。zwws 与 w# 的 取 值 见 表 13-3 ,成 分 如 的 得 分 i。 见 表 13-4。 
表 13-3 ws 与 wr 的 取 值 


和 目 变 量 wz 
Xl 0. 3679 
Ta 0. 6999 
Ta 0.2389 U. 67 0: 0.2389 OQ. 60350 


表 13-4 tt 的 得 分 ft 


1 


标准 化 变量 ys 关于 成 分 所 的 回归 模型 为 


Ve = rmtiTrantze, 上 忆 一 1 23 


由 于 成 分 & 可 以 写成 原 变 量 的 标准 化 变量 x) 的 限 数 , 即 有 


= i i 
th, 一 Wi Tl TT Teh C2 TT Tah Ta 
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由 此 可 得 由 成 分 到 所 建立 的 偏 最 小 二 乘 回 归 模 型 为 
YE 一 ri ( TUL 2 TU21t -和 Tal 3) TT rz Tul2T i TUz2Tt 2 十 TU32t 3) 
一 (rr lk CE) 11 右 Tak UL 12 ) Xl 十 TlEUU 21 和 了 Te 22 ) TX2 十 (Cr 1 CE 31 TT Tog a 32 让 江 3 


有 关 产 一 (myrazyri) 的 计算 结果 如 表 13-5 所 示 。 
表 13-5 回归 系数 rr， 


因此 ,有 
J = 0 0778 7 0 A089 22—0. 1322 2 
V2 一 一 0. 138 去 一 0.5244 zz — 0. 0854 zs 
ya 一 一 0. 0604 去 一 0. 1559 zz 一 0. 0073 Zs 
将 标准 化 变量 办 ,二 (CR 一 1,2,3) 分 别 还 原 成 原始 变量 yi,xi(k 王 1,2,3), 则 回归 方 
程 为 
$1 =— 0.0167 zi 一 0.8237 £2; 一 0. 0969 zs + 47.0197 
ja 一 一 0.3509 去 一 10. 2477 £2 — 0. 7412 £3 十 612. 5671 
5s 一 一 0.1253 z1 一 2.4969 zs — 0. 0518 zs 十 183. 9849 
为 了 更 直观 、 迅 速 地 观察 各 个 自 变量 在 解释 ys(k 二 1,2,3) 时 的 边际 作用 ,可 以 绘制 
回归 系数 图 ,如 图 13-1 所 示 。 


图 13-1 回归 系数 直方 图 


从 图 13-1 中 可 以 立刻 观察 到 ,腰围 变量 在 解释 三 个 回归 方程 时 起 到 了 极为 重要 的 
作用 。 然 而 ,与 单 枉 及 弯曲 相 比 ,跳高 成 绩 的 回归 方程 显然 不 够 理想 ,三 个 目 变 量 对 它 的 


解释 能 力 均 很 低 。 
为 了 考察 这 三 个 回归 方程 的 模型 精度 ,以 (ys ,ya ) 为 坐标 值 ,对 所 有 的 样本 点 绘制 预 


测 图 。 yz 是 第 & 个 变量 ,第 i 个 样本 点 (ya) 的 预测 值 。 


四 

体能 训练 的 预测 图 如 图 13-2 所 示 。 "i 
人 但 

单杠 成 绩 预 测 弯曲 成 绩 预 测 屁 


0 100 200 300 
跳高 成 绩 预 测 


图 13-2 体能 训练 预测 图 


如 图 13-2 所 示 ,如 果 所 有 点 都 能 在 图 的 对 角 线 附近 均匀 分 布 , 则 方程 的 拟 合 值 与 原 
值 差 异 很 小 ,这 个 方程 的 拟 合 效果 就 是 满意 的 。 
MATLAB 程序 如 下 : 


clce 针 清 屏 
clear all; 各 删除 workplace 变量 
close all; 秆 美 擅 显示 图 形 窗 口 


format short 
loadl( 'mydata. mat') 


figure, 

bar(xishu') 

axis tight 

hold on 

annotation( 'textbox', [0.26 0.14 0.086 0.07], 'String', {' 单 杠 '}, 'FitBoxToText', 'off'); 
annotation( 'textbox', [0.56 0.14 0.086 0.07], 'String',{' 变 区 '}, 'FitBoxToText', 'off').; 
annotation( ' 廿 extbox' [0.76 0.14 0.086 0.07], 'String', {' 跳 高 '}, 'FitBoxToText', 'off'); 


ch0 = repmat (ch0, num,1); 

yhat = ch0 + x0 * xish; 先 计 算 V 的 预测 值 
Ylmax = max( yhat ); 

Y2max = max( y0); 

ymax = max( [ylmax; y2max] ) 

cancha = Yhat 一 yO0; 竺 计算 残 差 

备 画图 

figure, 

subplot(2,2,1) 

plot(O0:Yymax(1),0:Yynmax(1), yhat(:,1),y0(:,1),'*x ") 
title(' 单 杠 成 绩 预 测 ') 

subplot(2,2,2) 
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plot(0:vymax(2),0: ymax(2), yhat(:,2),Yy0(:,2),'0') 
title(' 变 昌 成 绩 预 测 ') 


subplot(2,1 ,2) 
plot(0:ymax(3),0: ymax(3),vhat(:,3),y0(:,3),'H') 
title( ' 跳 高 成 绩 预 测 ') 


本 章 小 结 


偏 最 小 二 乘 回归 提供 了 一 种 多 对 多 线性 回归 建 模 的 方法 ,特别 当 两 组 变量 的 个 数 很 
多 ,上 且 都 存在 多 重 相关 性 ,而 样本 量 又 较 少 时 ,用 偏 最 小 二 乘 回归 建立 的 模型 具有 传统 的 
经 典 回归 分 析 等 方法 所 没有 的 优点 。 偏 最 小 二 乘 回归 分 析 在 建 模 过 程 中 集中 了 主 成 分 
分 析 、 典 型 相关 分 析 和 线性 回归 分 析 方 法 的 特点 ， 


人 工 稍 能 第 科 诞 生 于 20 世纪 50 年 代 中 期 ,当时 由 于 计算 机 的 产 
生 与 发 展 , 人 们 开始 了 具有 真正 意义 的 人 工 知 能 的 钱 究 。 它 在 目 动 推 
理 . 认 知 建 模 、 机 器 学 习 、 神 经 元 网 络 、 自 然 语 言 处 理 、 专 家 系统 、 智 能 
机 着 人 等 方面 的 理论 和 应 用 上 痢 取 得 了 称 得 上 具有 ” 秆 能 ”的 成 采 。 

本 和 草 主 要 介绍 三 种 经 典 镶 能 算法 及 其 MATLAB 实现 方法 。 

学 习 目 标 : 

。 了 了 解 人 工 知 能 基本 概念 ; 

。 竺 握 粒 子 群 算法 原理 及 其 使 用 方法 : 

。 和 苇 握 遗传 算法 原理 及 其 使 用 方法 : 

。 等 握 蚊 和 群 算法 原理 及 其 使 用 方法 。 


14.1 人 工 智 能 基本 概念 


人 工 智能 就 是 认识 智能 机 理 , 建 造 智能 实体 ,用 人 工 的 方法 去 模 
拟 和 实现 人 类 智能 。 从 这 个 意义 上 来 说 ,人 工 智能 的 定义 应 该 依赖 于 
对 智能 的 定义 。 本 节 从 智能 的 概念 人 手 , 讨 论 人 工 智能 的 一 些 基本 
概念 。 


14.1.1 智能 的 概念 


智能 及 乔 能 的 本 质 是 上 古今 中 外 许多 哲学 家 \ 脑 科学 家 一 下 在 努力 
探 寺 和 俩 究 的 问题 ,但 至 今 仍然 没有 完全 了 解 , 以 致知 能 的 发 生 与 物 
质 的 本 质 、 宇 宙 的 起 源 、 生 命 的 本 质 一 起 被 列 为 自然界 四 大 奥秘 。 

近 些 年 来 , 随 厦 脑 科 学 、 神 经 心理 学 等 录 究 的 进展 ,人 们 对 人 脑 的 
绍 构 和 功能 有 了 初步 认识 ,但 对 整个 神经 系统 的 内 部 结构 和 作用 机 
制 :特别 是 脑 的 功能 原理 还 没有 认识 清楚 :有 竺 进一步 的 探索 。 因 此 ， 
很 难 对 午 能 给 出 确切 的 定义 。 而 在 仿生 和 模拟 .超级 计算 机 方面 也 有 
其 特定 合 义 。 


1. 智能 的 分 类 


根据 霍华德 "加 德 纳 的 多元 镶 能 理论 ,人 类 的 和 镶 能 可 以 分 成 8 个 


计 油 圳 全 有 天 四 深 
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(1) 语言 智能 (linguistic intelligence)。 请 言 乔 能 是 指 有 效 地 运用 口 涉 语 言 或 文学 表 
达 上 日 己 的 思想 并 理解 他 人 ,灵活 向 握 语音 \ 语 义 ,语法 ,具备 用 言语 思维 、 用 言语 表达 和 欣 
芝 语 言 深 屋内 泗 的 能 力 结 合 在 一 起 并 运用 日 如 的 能 力 。 它 们 适合 的 职业 是 政治 活动 家 、 
主持 人 律师 .演说 家 、 编 辑 、 作家、 记者 教师 等 。 

(2) 数 尝 逻辑 智能 (logical-mathematical intelligence)。 数 尝 逻 辑 千 能 是 指 有 至 地 计 
鼻 测量、 推理 .归纳 、 分 类 ,并 进行 复习 数学 运算 的 能 力 。 这 项 镶 能 包括 对 逻辑 的 方式 和 
天 系 ,陈述 和 主张 、 功 能 及 其 他 相关 的 抽象 概念 的 敏感 性 。 它 们 适合 的 职业 是 科学 家 会 
计 师 ,统计 学 家 ,工程 师 、 电 脑 软体 人 研发 人 员 等 。 

(3) 空间 智能 (spatial intelligence)。 空 间 智能 是 指 准 确 感 徊 视觉 空间 及 周 周 一 切 事 
物 , 并 且 能 把 所 感觉 到 的 形象 以 图 夯 的 形式 表现 出 来 的 能 力 。 这 项 智能 包括 对 色彩 、 线 
条 形状 .形式 .空间 关系 很 敏感 。 它 们 适合 的 职业 是 室内 设计 师 、 建 筑 师 、 摄 影 师 .画家 、 
飞行 员 等 。 

(4) 身体 运动 智能 (bodily-kinesthetic intelligence)。 和 生体 运动 智能 是 指 善 于 运用 整 
个 身体 来 表达 思想 和 情感 .灵巧 地 运用 双手 制作 或 操作 物体 的 能 力 。 这 项 智能 包括 特殊 
的 导体 技巧 ,如 平衡 .协调 敏捷 ,力量 、 弹 性 和 速度 以 及 由 触觉 所 引起 的 能 力 。 它 们 适合 
的 职业 是 运动 员 .演员 .舞蹈 家 、 外 科 医 生 、 宝 石匠、 机 械 师 等 。 

(5) 音乐 智能 (musical intelligence)。 音 朱智 能 是 指 人 能 人 够 敏锐 地 感知 音调 ,旋律 、 
记 委 、 首 色 等 能 力 。 这 项 智能 对 广大 、 首 调 、 旋 律 或 首 色 的 敏感 性 强 , 与 生 俱 来 就 拥有 首 
乐 的 天 赋 ,具有 较 高 的 表 汗 .创作 及 思考 音乐 的 能 力 。 它 们 适合 的 职业 是 歌唱 家 、 作 曲 
家 《指挥 家 .音乐 评 论 家 .调和 区 师 等 。 

(6) 人 际 智 能 Cinterpersonal intelligence) 。 人 际 智 能 是 指 能 很 好 地 理解 别人 和 与 人 
交往 的 能 力 。 这 项 智能 善于 察觉 他 人 的 情绪 情感 ,体会 他 人 的 感觉 感受 .辨别 不 同人 际 
关系 的 上 暗示 以 及 对 这 些 上 暗示 做 出 适当 反应 的 能 力 。 它 们 适合 的 职业 是 政治 家 、 外 区 家 、 
领导 者 ,心理 咨 调 师 .公关 人 员 、 推 销 等 。 

(7) 自我 认 知 智能 (intrapersonal intelligence) 。 自我 认 知 智能 是 指 自 我 认识 和 善于 
目 知 之 明 并 据 此 做 出 适当 行为 的 能 力 。 这 项 智能 能 够 认识 目 己 的 长 处 和 短处 ,意识 到 日 
己 的 内 在 爱好 、 情绪、 意 回 .脾气 和 目 匠 , 避 欢 独立 思考 的 能 力 。 它 们 适合 的 职业 是 哲学 
家 政治 家 、 思想 家 .心理 学 家 等 。 

(8) 自然 认 知 智能 Cnaturalist intelligence) 。 自 然 认 知 智能 是 指 善 于 观察 自然 界 中 
的 各 种 事物 ,对 物体 进行 辨别 和 分 类 的 能 力 。 这 项 智能 有 着 强烈 的 好 奇 心 和 求知 欲 , 有 
着 敏锐 的 观察 能 力 , 能 了 解 各 种 事物 的 细微 差别 。 它 们 适合 的 职业 是 天 文学 家 、 生 物 学 
家 、 地 质 学 家 .考古 学 家 、 环 境 设计 师 等 。 


2. 认识 乔 能 的 不 同 观点 
根据 对 人 脑 已 有 的 认识 ,结合 智能 的 外 在 表现 ,从 不 同 的 角度 .不 同 的 侧面 .用 不 同 
的 方法 对 智能 进行 研究 ,学 者 们 提出 了 几 种 不 同 的 观点 ,其 中 影响 较 大 的 观点 有 思维 理 


论 、 知 识 国 值 理论 及 进化 理论 等 。 
(1) 思维 理论 。 认 为 智能 的 核心 是 思维 ,人 的 一 切 镶 能 部 来 日 大 脑 的 思维 活动 ,人 类 


的 一 切 知 识 都 是 人 类 思维 的 产物 ,因而 通过 对 思维 规律 与 方法 的 研究 可 望 揭示 智能 的 

(2) 知识 国 值 理 论 。 认 为 智能 行为 取决 于 知识 的 数量 及 其 一 般 化 的 程度 ,一 个 系统 
之 所 以 有 智能 是 因为 它 具 有 可 运用 的 知识 。 因 此 ,知识 国 值 理 论 把 智能 定义 为 : 智能 就 
是 在 巨大 的 搜索 空间 中 迅速 找到 一 个 满意 解 的 能 力 。 这 一 理论 在 人 工 智 能 的 发 展 史 中 
有 痢 重 要 的 影 啊 ,知识 工程 .专家 系统 等 都 是 在 这 一 理论 的 影响 下 发 展 起 来 的 。 

63) 进化 理论 。 认 为 人 的 本 质 能 力 是 在 动态 环境 中 的 行走 能 力 、. 对 外 界 事物 的 感知 
能 力 ,维持 生命 和 繁衍 生息 的 能 力 。 核 心 是 用 控制 取代 表示 ,从 而 取消 概念 ,模型 及 显示 
表示 的 知识 ,否定 抽象 对 智能 及 智能 模型 的 必要 性 ,强调 分 层 结 构 对 智能 进化 的 可 能 性 
与 必要 性 。 该 智能 一 般 是 后 天 形成 的 ,其 原因 为 对 外 界 刺激 做 出 反应 。 例 如 将 一 婴儿 置 
于 黑 屋 子 中 . 则 一 段 时 间 以 后 ,他 的 智力 仍 接 近 0, 这 说 明智 能 的 产生 与 自己 本 身 无 关 :而 
取决 于 自身 对 外 界 刺 激 的 反应 。 再 例如 报道 的 “ 猪 孩 ”, 因 其 接受 的 刺激 远 少 于 正常 儿童 
而 无 法 发 展 到 正常 智力 。 思 维 的 产生 是 基于 对 复杂 刺激 所 生成 的 复杂 反应 。 智 能 的 体 
现 为 感知 上 和 目 身 的 存在 。 

综 上 ,可 以 认为 智能 是 知识 与 智力 的 总 和 。 其 中 ,知识 是 一 切 智能 行为 的 基础 ,而 智 
力 是 获取 知识 并 运用 知识 求解 问题 的 能 力 ,是 头脑 中 思维 活动 的 具体 体现 。 


3. 智能 的 层次 结构 


根据 脑 科 学 俩 究 , 人 类 和 鲁能 总 体 上 可 以 分 为 高 .中 、 低 三 个 层次 。 不 同 层 次 千 能 的 洒 
动 由 不 同 的 神经 系统 来 完成 。 

(1) 局 层 和 镶 表 以 大 脑 皮 层 为 主 , 大 脑 朗 层 义 称 为 抑制 中 枢 , 主 要 完成 记忆 思维 等 酒 动 。 

(2) 中 层 千 能 以 丘脑 为 主 : 也 称 为 感 筑 中 枢 :主要 完成 感知 活动 。 

(3) 低层 千 能 以 小 脑 背 此 为 主 : 主 要 完成 动作 反应 活动 。 

可 见 : 把 午 能 的 不 同 观点 和 和 铝 能 的 层次 结构 联系 起 来 看 ,思维 理论 和 知识 效 值 理论 
对 应 于 高 层 智能 ,进化 理论 对 应 于 中 层 智 能 和 低层 智能 。 


14.1.2 人工 短 能 的 概念 


人 工 入 能 (artificial intelligence) ,英文 缩写 为 AI。 和 它 是 人 赋 究 `. 开 发 用 于 模拟 .延伸 和 
扩展 人 的 智能 的 理论 、 方 法 、 技 术 及 应 用 系统 的 一 门 新 的 技术 科学 。“ 人 工 智能 ”一 词 最 
初 是 在 1956 年 Dartmouth 学 会 上 提出 的 。 从 那 以 后 .人 研究 者 们 发 展 了 众多 理论 和 原理 . 
人 工 智 能 的 概念 也 随 之 扩展 。 

从 1956 年 正式 提出 人 工 智 能 学 科 算 起 ,50 多 年 来 ,取得 长 足 的 发 展 , 成 为 一 门 广泛 
的 菇 义 和 前 油 科 等 。 


总 的 来 说 ,人 工 吞 能 的 目的 就 是 让 计算 机 这 人 台 机 各 能 够 像 人 一 样 思考 。 如 有 果 硕 望 做 


出 一 台 能 够 思考 的 机 器 : 那 就 必须 知道 什么 是 思考 ,更 进一步 讲 就 是 什么 是 智慧 

什么 样 的 机 器 才 是 智慧 的 呢 ? 科学 家 已 经 作出 了 汽车 、 火 车 、 飞 机 .收音 机 等 ,它们 
模仿 我 们 身体 器 官 的 功能 ,但 是 能 不 能 模仿 人 类 大 脑 的 功能 呢 ? 我 们 也 仅仅 知道 这 个 装 
在 我 们 天 灵 盖 里 面 的 东西 是 由 数 十 亿 个 神经 细胞 组 成 的 器 官 , 我 们 对 这 个 东西 知之 其 
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少 ,模仿 它 或 许 是 天 下 最 困难 的 事情 。 

当 计 算 机 出 现 后 ,人 类 开始 真正 有 了 一 个 可 以 模拟 人 类 思维 的 工具 ,在 以 后 的 岁月 
中 ,无数 科学 家 为 这 个 目标 努力 着 。 

:家 的 专利 了 ,全 世界 几乎 所 有 大 学 的 计算 机 系 都 
有 人 在 研究 这 门 学 科 , 学 习 计 算 机 的 大 学 生 也 必须 学 习 这 样 一 门 课程 ,在 大 家 不 懈 的 努 
力 下 ,现在 计算 机 似乎 已 经 变 得 十 分 聪明 了 。 

例如 ,1997 年 5 月 ,IBM 公司 研制 的 深蓝 (deep blue) 计算 机 战胜 了 国际 象棋 大 师 卡 
斯 帕 洛 夫 (Kasparov) 。 大 家 或 许 不 会 注意 到 ,在 一 些 地 方 计 算 机 帮助 人 进行 其 他 原来 只 
属于 人 类 的 工作 ,计算 机 以 它 的 高 速 和 准确 为 人 类 发 挥 着 它 的 作用 。 

人 工 智 能 始终 是 计算 机 科学 的 前 沿 学 科 , 计 算 机 编程 语言 和 其 他 计算 机 软件 都 因为 
有 了 了 人工 智 能 的 进展 而 得 以 存在 。 


14.1.3 ”人 工 智能 的 研究 目标 


关于 人 工 智 能 的 研究 目标 ,目前 还 没有 统一 的 意见 。 斯 洛 曼 于 1978 年 规划 了 三 个 
主要 目标 : 

(1) 对 智能 行为 有 效 解 释 的 理论 分 析 ，。 

(2) 解释 人 类 智能 。 

(3) 构造 智能 的 人 工 制 品 。 

要 实现 斯 洛 曼 的 这 些 目 标 , 需 要 同时 开展 对 智能 机 理 和 智能 构造 技术 的 人 研究。 图 灵 
在 摘 述 智能 机 峰 的 时 候 , 尽 管 没 有 提 到 思维 过 程 , 但 是 想 要 真正 实现 这 种 智能 机 顺 , 却 同 
样 离 不 开 对 智能 机 理 的 研究 。 

因此 ,揭示 人 类 智能 的 根本 机 理 , 用 智能 机 器 去 模拟 、 延 什 和 扩展 人 类 智能 应 该 是 人 
工 知 能 的 根本 目标 ,或 者 证 期 目标 。 

人 工 智 能 的 远 期 目标 涉及 脑 科学 、 认 知 科 学 ,计算机 科学 ,系统 科学 、 微 电子 及 控制 
方法 论 等 多 种 科学 ,并 有 赖 于 这 些 学 科 的 共同 发 展 。 但 从 目前 这 些 学 科 的 发 展 情况 来 
看 ,实现 人 工 知 能 的 了 远 期 目标 还 知 要 很 长 的 时 间 。 

在 这 种 情况 下 ;人 工 智 能 的 近期 目标 是 人 研究 如 何 使 现 有 计算 机 更 加 “聪明 ”, 即 使 计 
算 机 可 以 运用 知识 去 处 理 问 题 模拟 人 类 的 智能 行为 (如 学 习 ,分析 、 思 考 等 )。 

为 了 实现 这 个 目标 ,需要 大 家 根据 现 有 计算 机 的 特点 ,人 钱 究 实 现 智 能 的 有 关 方 法 和 
技术 ,建立 对 应 的 智能 系统 。 

实际 上 ,人 工 镶 能 的 远 期 目标 和 近期 目标 是 相辅相成 的 。 远 期 目标 为 近期 目标 指明 
了 方 回 ,而 近期 目标 为 远 期 目标 葛 定 了 理论 和 技术 基础 。 同 时 ,近期 目标 和 远 期 目标 并 
没有 严格 的 界限 。 近 期 目标 会 随 着 人 工 智 能 研究 的 发 展 而 变化 .并 最 终 达 到 远 期 目标 。 


14.2 人工 智能 的 典型 应 用 


人 工 智 能 的 应 用 领域 已 经 非常 广泛 ,这些 应 用 从 理论 到 技术 ,从 产品 到 工程 ,从 家 庭 
到 社会 ,如 智能 家 居 、 智 能 网 络 、 智 能 交通 、 智 能 楼 宇和 智能 控制 等 。 下 面 简 单 介 绍 几 种 


机 咎 人 和 是 一 种 具有 人 类 的 茶 些 鲁能 行为 的 机 着 。 它 是 在 电 于 和 尝 、 人工 旬 能 、 控 制 论 、 
系统 工程 和 心理 学 等 多 种 和 学 科 或 技术 发 展 的 基础 上 形成 的 一 种 综合 性 技术 学 科 。 

机 和 响 人 可 以 分 为 很 多 类 型 ,如 工业 机 器 人 、 水 下 机 器 人 、 家 用 机 器 人 等 。 其 研究 的 主 
要 目的 是 : 从 应 用 方面 考虑 ,可 以 让 机 各 人 各 助 或 代 藻 人 去 完成 一 些 工作 ; 从 科学 方面 
考 慑 ,可 以 为 人 工 入 能 的 全 究 提供 一 个 综合 试验 场地 ，。 

机 器 人 既是 人 工 智 能 的 研究 对 象 ,也 是 人 工 智 能 的 试验 场 。 几 乎 所 有 的 人 工 智 能 技 
术 都 可 以 在 机 各 人 中 得 到 应 用 。 

镶 能 机 大 人 是 一 种 具有 怀 和 静 力 、 思 维 能 力 和 行为 能 力 的 新 一 代 机 各 人 。 这 种 机 玫 
人 部 能 够 主动 适应 外 界 环 十 变化 ,并 能 够 通过 等 习 丰 贸 目 己 的 知识 , 提 噩 目 己 的 工作 能 
力 。 目 前 全 究 的 智能 机 各 人 已 经 可 以 根据 命令 完成 许多 复 染 的 控 作 。 


2. 智能 网 络 


因特网 的 产生 和 发 展 为 人 类 提供 了 方便 快捷 的 学 习 交 换 手 段 ,人 它 极 大 地 改变 7 了 人们 
的 生活 和 工作 方式 ,已 成 为 当今 人 类 社会 信息 化 的 一 个 重要 标志 。 但 是 基于 因特网 的 万 
维 网 却 是 一 个 杂乱 无 章 、 真 假 不 分 的 信息 海洋 ,大 量 的 信息 元 余 给 人 们 带 来 很 多 烦恼 。 
因此 ,实现 智能 网 络 具 有 极 大 的 理论 意义 和 实际 价值 。 

智能 网 络 有 两 个 重要 的 人 研究 内 容 : 智能 搜索 引擎 和 吞 能 网 络 。 知 能 搜索 引擎 是 一 种 
可 以 为 用 户 提 供 内 容 识 别 \ 信 息 过 小 和 每 人 性 化 服务 的 搜索 引擎 。 乔 能 网 络 是 一 种 物理 结 
构 和 物理 分 布 无 关 的 网 络 环境 ,人 它 能 够 实现 各 种 资源 的 充分 分 至 ,能 为 不 同 的 用 户 提 供 
个 性 化 的 网 络 服务 。 


3. 智能 检索 


智能 检索 是 指 利 用 人 工 智 能 的 方法 从 大 量 信 息 中 尽快 找到 所 需要 的 信息 或 知识 。 
随 着 科学 技术 的 迅速 发 展 和 学 习 手 段 的 快速 提升 ,在 各 种 数据 库 , 尤 其 是 因特网 上 存放 
着 大 量 信 息 。 面 对 这 些 数 据 ,; 需 要 相应 的 智能 检索 技术 帮助 人 们 快速 、 准 确 地 完成 检索 
工作 。 

完成 智能 检索 系统 的 设计 需要 解决 以 下 几 个 问题 : 

(1) 能 理解 用 卓然 语言 提出 的 各 种 问题 。 

(2) 具有 一 是 的 推理 能 力 。 

(3) 拥有 一 是 的 稼 识 性 直 识 。 

4. 智能 游戏 

乔 能 游戏 是 游戏 拉 术 与 智能 技术 的 一 种 结合 , 它 是 有 具有 一 定 智能 行为 的 游戏 。 在 智 
能 游戏 中 用 到 的 智能 技术 主要 有 以 下 几 种 : 

(1) 感知 一 一 实现 对 玩家 角色 的 感知 。 

(2) 行为 一 一 负责 根据 选择 的 行为 对 游戏 状态 进行 更 新 。 
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(3) 推理 和 决策 一 一 负责 对 当前 信息 的 认 知 和 决策 ，。 

(4) 记忆 一 一 用 于 记忆 不 同 的 行动 序列 。 

《5) 搜索 一 一 用 于 寻找 不 同 的 行动 序列 。 

(6) 学 习 一 一 非 玩 家 角色 在 游戏 过 程 中 学 到 一 定 的 知识 。 

智能 游戏 不 仅 是 人 工 智 能 的 一 个 研究 方向 和 应 用 对 象 ,同时 也 是 人 工 智 能 研究 的 一 
个 很 好 的 试验 平台 。 


14.3 人 工 智 能 的 MATLAB 实现 


在 人 工 智能 研究 领域 ,智能 算法 是 其 重要 的 一 个 分 支 。 目 前 智能 计算 正在 蓬勃 发 
展 , 研 究 人 工 智能 的 领域 十 分 活跃 。 虽 然 智 能 算法 研究 水 平 暂时 还 很 难 使 “智能 机 器 ” 真 
正 具 备 人 类 的 智能 ,但 是 人 工 脑 是 人 脑 和 生物 脑 的 结合 ,这 种 结合 将 使 人 工 智能 的 研究 
向 着 更 广 和 更 深 的 方向 发 展 。 

智能 计算 不 断 地 在 探索 智能 的 新 概念 、 新 理论 .新 方法 和 新 技术 ,这 些 研究 成 果 将 给 
人 类 世界 带 来 巨大 的 改变 。 本 节 重 点 介绍 几 种 经 典 的 人 工 智能 算法 的 MATLAB 实现 。 


14.3.1 粒子 群 算法 的 MATLAB 实现 


粒子 群 优 化 算法 (Cparticle swarm optimization) ,缩写 为 PSO, 属 于 进化 算法 的 一 种 ， 
评价 解 的 品质 ,但 它 比 直 传 算法 规则 更 为 简单 , 它 疫 有 遗传 算法 的 “交叉 ”(Ccrossover) 和 
“变异 (mutation) 操作 , 它 通 过 追随 当前 搜索 到 的 最 优 值 来 寻找 全 局 最 优 。 


1. 基本 原理 


PSO 从 这 种 模型 中 得 到 启示 并 用 于 解决 优化 问题 。PSO 中 ,每 个 优化 问题 的 潜在 解 
部 是 搜索 空间 中 的 一 只 鸟 , 称 为 粒子 。 所 有 jog 二 
的 粒子 都 有 一 个 由 被 优化 的 函数 决定 的 适 值 < 
(fitness value) ,每 个 粒子 还 有 一 个 速度 决定 
它们 “飞行 ”的 方向 和 距离 。 然 后 粒子 们 就 追 
随 当前 的 最 优 粒 子 在 解 空 间 中 搜索 。 

粒子 位 置 的 更 新 方式 如 图 14-1 所 示 。 i 

其 中 ,x 表示 粒子 起 始 位 置 ; v 表示 粒子 x 
“飞行 ”的 速度 ; p 表示 搜索 到 的 粒子 的 最 优 pp 
位 置 。 

PSO 初始 化 为 一 群 随机 粒子 (随机 解 ) ,然后 通过 迭代 找到 最 优 解 。 在 每 一 次 迭代 
中 ,粒子 通过 跟踪 两 个 极 值 来 更 新 自己 ; 第 一 个 就 是 粒子 本 身 所 找到 的 最 优 解 ,这 个 解 称 
为 个 体 极 值 ; 另 一 个 极 值 是 整个 种 群 目前 找到 的 最 优 解 ,这 个 极 值 是 全 局 极 值 。 另 外 ,也 
可 以 不 用 整个 种 群 而 只 是 用 其 中 一 部 分 作为 粒子 的 邻居 ,那么 在 所 有 邻居 中 的 极 值 就 是 
局 部 极 值 。 


目 我 记忆 的 影响 
Vig 


当前 速度 的 影 啊 


假设 在 一 个 DD 维 的 目标 搜索 空间 中 ,有 N 个 粒子 组 成 一 个 群落 ,其 中 第 ;个 粒子 表 

示 为 一 个 D 维 的 癌 量 
Ri = (Xa TTD) 2 一 1 2 
第 i 个 粒子 的 “飞行 ”速度 也 是 一 个 D 维 的 向 量 , 记 为 
到 一 《Tilyzizye UpD), 2 一 1 2 ,3 
第 工人 个 粒子 迄今 为 止 搜索 到 的 最 优 位 置 称 为 个 体 极 值 , 记 为 
Pbest = Cpas pris spin), 1= 1,2,°** ,NN 
整个 粒子 群 运 今 为 止 搜索 到 的 最 优 位 置 为 全 局 极 值 , 记 为 
Bhbest = (pa Paz s*** , Pap) 
在 找到 这 两 个 最 优 值 时 .粒子 根据 如 下 公式 来 更 新 日 己 的 速度 和 位 置 : 
vid = Ww Vd crit pa OO— Xd) cr pa OO— Ta) 
Xd 一 Xu TT Va 

式 中 ,cl 和 cz 为 学 习 因 子 ,也 称 加 速 常数 (acceleration constant); ri 和 rz 为 L0,1| 范 
围 内 的 均匀 随机 数 。 

公式 vig 二 Ww x* vg 十 cIri(pia 一 Xd) 十 cerz(ped 一 Xa) 右 边 由 三 部 分 组 成 ; 

第 一 部 分 为 “惯性 (inertia)” 或 “动量 (momentum)” 部 分 ,反映 了 粒子 的 运动 “习惯 
(habit)”, 代 表 粒 子 有 维持 目 己 先前 速度 的 趋势 ，。 

第 二 部 分 为 ” 认 知 (cognition) ”部 分 ,反映 了 粒 于 对 上 月 身 历 史 经 验 的 记忆 或 回忆 :, 代 
表 粒 于 有 回 目 身 历 史 最 佳 位 置 通 近 的 趋势 。 

第 三 部 分 为 “社会 Csocial) ”部 分 :反映 了 粒子 间 协 同 合 作 与 知识 共 宇 的 群体 历史 经 
验 ,代表 粒 于 有 加 群体 或 邻 瑾 历史 最 佳 位 置 盘 近 的 趋势 。 

由 于 粒子 群 算法 具有 总 效 的 搜 款 能力 ,有 利于 得 到 多 目标 意义 下 的 最 优 解 ; 通过 代 
表 整 个 解 集 种 群 , 按 并 行 方式 同时 搜索 多 个 非 劣 解 ,也 即 搜索 到 多 个 Pareto 最 优 解 。 

同时 ,粒子 群 算 法 的 通用 性 比较 好 ,适合 处 理 多 种 类 型 的 目标 肾 数 和 约束 ,并 旦 容易 
村 传统 的 优化 方法 结合 ,从 而 改进 目 生 的 局 限 性 ,更 高 效 地 解决 问题 。 因 此 ,将 粒子 和 群 算 
法 应 用 于 解雇 多 目标 优化 问题 上 有 具有 很 大 的 优势 。 


2. 程序 设计 


基本 粒子 群 算法 的 流程 图 如 图 14-2 所 示 。 其 具体 过 程 如 下 : 

(1) 初始 化 粒子 群 ,包括 群体 规模 NN ,每 个 粒子 的 位 置 x; 和 速度 mi。 

《2) 计算 每 个 粒子 的 适应 度 值 Fi[ij。 

(3) 对 每 个 粒子 ,用 它 的 适应 度 值 [让 和 个 体 极 值 poest 0 比较 ,如 果 FL 让 二 记 aeeCi) ， 
则 用 FiLi 蔡 换 挥 Poes(Cz) 。 

(4) 对 每 个 粒子 ,用 它 的 适应 度 值 FiLij 和 全 局 极 值 gpes 比较, 如 果 FisLi] 二 pes(Ci)， 
则 用 FLzj 罗 插 挥 gbest。 

(5) 更 新 粒子 的 速度 ww 和 位 置 x;。 

《6) 如 果 满 足 结 束 条 件 ( 误 差 足 够 好 或 到 达 最 大 循环 次 数 ) 退 出 ,否则 返回 第 2 步 。 

在 MATLAB 中 编程 实现 的 基本 粒子 和 群 算法 基本 函数 为 PSO。 其 调用 格式 如 下 : 


人 
工 
知 
算 
法 
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初始 化 粒子 的 速度 和 位 置 计算 粒子 适应 值 


获取 群体 全 局 最 优 值 获取 粒子 的 个 体 最 优 值 


根据 公式 优化 粒子 速度 恨 据 公式 优化 粒子 位 和 置 


输出 结果 一 一 < 一 满足 结束 条 件 


图 14-2 PSO 算法 流程 图 


[ xm, ET = PSO(fitness,N,cl,c2,w,M,D) 


其 中 ,fitness 为 待 优化 的 目标 函数 ,也 称 适应 度 函 数 ; N 是 粒子 数目 ; cl 是 学 习 因 子 
1; cz 是 学 习 因 子 2; w 是 惯性 权重 ; M 是 最 大 和 迭 代数 ; D 是 自 变量 的 个 数 ; xm 是 目标 
z 函数 取 最 小 值 时 的 自 变量 ; fv 是 目标 函数 的 最 小 值 。 
: 使 用 MATLAB 实现 基本 粒子 群 算法 时 代码 如 下 : 


function|[ xm, fv| = PSO(fitness,N,cl,c2,w,M,D) 

| 第 秆 千 秆 千 秆 第 给 定 初 嫩 化 条 件 秆 第 第 第 人 千 知人 第 害 第 第 

' $ cl 为 学 习 因 于 1 

c2 为 学 习 因 子 2 

W 为 惯性 权重 

M 为 最 大 迁 代 次 数 

D 为 自 变量 的 个 数 

和 和 为 初始 化 群体 个 体 数 目 

秆 人 秆 第 秆 第 为 初始 化 种 群 的 个 体 ( 可 以 在 这 里 限定 位 置 和 过 度 的 范围 ) 告 告 委 竺 千 秆 秆 秆 秆 第 

format long; 

for i=1:N 

for ] 三 工 :D 

x(i,j) = randn; 和 随机 初始 化 位 置 
v(i,j) = randn; 委 随 机 初始 化 速度 


end 
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I end 
| 秆 竺 竺 秆 第 第 先 计 算 各 个 粒子 的 适应 度 , 并 初始 化 pi 和 pg 千 千 竺 第 第 秆 第 第 第 第 秆 秆 第 千 慎 
fori=1:N 
p(i) = fitness(x(i,:)):; 
vw 
end 
pg= x(N, : ); 多 pg 为 全 局 最 优 
for i=1:(N-1) 


if fitness(x(i,:)) <fitness(pg) 
pg = x(1, :); 
end 
end 
委 竺 先 和 当 委 进入 主要 循环 ,按照 公式 依次 选 代 ,直到 满足 精度 要 求 委 千 千 千 委 
于 DIE 二 三 工 :M 
for T=1:N 先 更 新 速度 、 位 移 
vi,::) =wx vi,:}) +cl x randx (vy(1,:)— x(1,:))+c2 x randx (pg— x(1i,:})):; 
天 工人 
if fitness(x(1i,:)) <p(i) 
p(i) = fitness(x(i,:)); 
hie = les 
end 
if p(i)<fitness(pg) 
pg = Y(1, :); 
end 
end 
Pbest( 七 ) = fitness(pg); 
end 
先 秆 人 竺 秆 第 第 最 后 给 出 计算 结果 
disp( ' 目 标 函 数 取 了 最 小 值 时 的 自 变 量 : ') 
xm = pg' 
disp(' 目标 函 数 的 最 小 值 为 : ') 
fv = fitness(pg) 


将 上 面 的 银 数 保存 到 MATLAB 可 搜索 路 生 中 :, 即 可 调用 该 力 效 。 册 定义 不 同 的 目 
标 果 数 fitness 和 其 他 输入 量 , 就 可 以 用 粒子 群 算 法 求解 不 同 问 题 。 

粒 - 天 和 群 算 法 使 用 的 盟 数 有 很 多 种 ,下 面 介 绍 两 个 稼 用 的 适应 度 图 数 。 

1) Griewank 阴 数 

该 图 数 的 MATLAB 代码 如 下 : 


function y= Griewank(x) 
和 Griewank 函数 
和 输入 x, 给 出 相应 的 了 值 ,在 x= (0,0,…,0) 处 有 全 局 极 小 点 0 
[row, col|] = size(x):; 
if row> 1 
error(' 输 入 的 参数 错误 '); 
end 
YL = 1/4000 x sum(x.*2); 
y2=1; 
forh=1:col 
Vy2= y2x* cos(x(h)/sqrt(h)); 
end 
可 三 了 一 了 2 十 工 ; 
本 一 一 Yr 
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绘制 以 上 也 数 图 形 的 MATLAB 代码 如 下 : 


function DrawGriewank( ) 
第 绘制 Griewank 函数 图 形 
xX=[—-8:0.1:8]: 
YX; 
[X,Y] = meshgrid(x,v); 
[row, col] = size(X).; 
forl=1:col 

for h= 1:row 

z(h,1)= Griewank([X(h,1),Y(h,1)|]); 

end 
end 
surf(X, YY,z); 
shading interp 


’ 将 以 上 代码 保存 为 DrawGriewank. m 文件 ,并 运行 上 述 
像 如 图 14-3 所 示 。 


代码 ,得 到 Griewank 函数 图 
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图 14-3 ”Griewank 函数 图 像 


2) Rastrigin 了 数 
该 函数 MATLAB 代码 如 下 : 


function y= Rastrigin(x) 
千 Rastrigin 函数 
名 输入 xi 给 出 相应 的 Y 值 ,在 x= (0,0, …,0) 处 有 全 局 极 小 点 0 
[row, col|] = size(x); 
if row> 1 
error(' 输 入 的 参数 错误 '); 
end 
了 = sum(x. “2— 10x cos(2*x pix x) +10); 
Fe 


绘制 以 上 函数 图 形 的 MATLAB 代码 如 下 : 
function DrawRastrigint() 


区 三 | 一 4:0.05:41; 


y= xXx; 


[X,Y] = meshgrid(x, y); 
[row, col] = size(X); 
for 1]=1:col 
for h=1 :row 
z(h,1) = Rastrigin([X(h,1),Y(h,1)]); 
end 
end 
surf(X,Y,z); 
shading interp 


运行 上 述 人 代码, 得 到 Rastrigin 恩 数 图 像 如 图 14-4 所 示 。 
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图 14-4 Rastrigin 图 数 图 像 
【 例 14-1】 利用 上 面 介绍 的 基本 粒子 群 算法 求解 下 列 函 数 的 最 小 值 。 
[ot 


利用 PSO 算法 求解 最 小 值 , 需 要 首先 确认 不 同 迭 代步 数 对 结果 的 影响 。 设 定 题 中 国 
数 的 最 小 点 均 为 0, 粒 子 群 规模 为 50 ,惯性 权 值 为 0. 5, 学 习 因 子 1 为 1.5, 学 习 因 子 2 为 
2.5, 迭 代步 数 分 别 取 为 100、1000、10000， 

在 MATLAB 中 建立 目标 函数 代码 如 下 : 


function F = fitness(x) 

FE=0.; 

for i=1:30 
EF=F+x(1i})*2+x(1}—6 


end 


在 MATLAB 命令 行 窗口 输入 以 下 代码 ; 


X= zeros(1, 30).: 

[xml,fvi] = PSO( (wfitness,50,1.5,2.5,0.5,100,30); 
[xm2, fv2] = PSO( @fitness,50,1.5,2.5,0.5,1000, 30); 
[xm3, fv3] = PSO( @fitness,50,1.5,2.5,0.5,10000, 30); 


运行 以 上 代码 ,比较 目标 函数 取 最 小 值 时 的 自 变 量 , 如 表 14-1 所 示 。 
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表 14-1 比较 不 同和 迭代 步 数 下 的 目标 函数 值 和 最 小 值 


0. 432 057 786 059 138 
0. 562 337 192 754 589 
0. 216 285 572 045 985 
0. 448 174 496 712 675 
0.0 101 008 034 620 69] 
. 359 780 035 B41] 033 
0. 244 678 550 463 580 
0.316 139 905 200 595 
D0. 408 639 179 789 46] 
0. 642 619 836 410 718 
0. 522 925 465 434 690 
0. 203 441 587 074 036 
. 563 308 887 343 590 
0. 301 808 274 435 673 
0. 709 768 167 671 245 
0. 420 233 565 717 63] 
D0.0 649 786 155 553 592 
0.0 835 405 545 618 33] 
0.677 113 366 792 996 
.288 800 585 542 166 
0. 423 115 455 971 755 
.483 611 573 904 200 
0.296 101 193 584 627 
0. 364 523 672 340 500 
0. 217 234 643 531 979 
0. 056 237 109 118 850 2 
.507 805 752 603 469 
0.0 208 750 670 471 909 


目标 轴 数 
最 小 值 fv 


692 117 109 108 


. 322 086 628 880 754 
0. 236 499 213 027 137 
.174672 457 595 542 
.323 434 573 71]1 674 
0. 559 755 785 428 548 
. 500 724 696 101 979 
0. 334 601 378 057 723 
. 599 261 558 115 410 
0.689 138 008 554 286 


.9552 156 841 443 132 
.354 652 539 291 389 
0. 473 586 592 491 48] 
.542 947 832 512 436 
. 571 165 888 709 759 


0. 145 197 593 442 009 


692 117 109 108 


一 184. 


10 000 


.435 569 044 575 185 
.456 597 706 978 179 

. 272 9548 635 326 235 

. 410 028 636 513 352 
.478 395 017 745 105 
.438 617 720 718 304 

. 624 351 586 431 356 
.542 835 397 138 839 

. 243 113 131 019 114 
.143 940 233 374 03] 
.706 252 186 322 252 
.O00 781 653 355 911 016 
.334 838 983 888 102 
.104 353 647 362 726 
.438 931 696 076 205 
.177 440 809 228 91] 
.621 428 723 324 555 
.321 409 146 325 643 
.340 215 630 334 193 
.435 868 961 230 739 

. 402 359 314 141 048 
.663 112 621 839 92] 

. 2243 847 375 888 005 
.372767 988 055 409 
.588 328 193 723 098 
.310 699 752 647 837 
.474 445 660 596 261] 
.0 836 30]1 944 341 218 
.0 284 228 008 093 966 
.397 530 666 505 423 


692 117 109 108 


从 表 14-1 可 以 看 出 ,迷人 代步 数 不 一 定 与 获得 解 的 精度 成 正比 ,即兴 代 步 数 越 大 , 著 得 
解 的 精度 不 一 定 越 高 。 这 是 因为 PSO 算法 是 一 种 随机 算法 ,同样 的 参数 也 会 算出 不 同 的 


结果 。 


在 上 述 参 数 基 础 上 ,保持 惯性 权重 为 0. 5、 学 习 因 子 1 为 1.5. 学习 因 了 于 2 为 2.5.、 帮 
代步 数 为 100 不 变 ,粒子 群 规模 分 别 取 10、100 和 500 ,运行 以 下 MATLAB 代码 : 


X= Zeros( 1 30): 


[xml,fvi| = PSO( (Wfitness,10,1.5,2.5,0.5,100,30); 


[xm2, fv2] = PSO( @fitness,100,1.5,2.5,0.5,100,30); 
[xm3, fv3] = PSO( @fitness,500,1.5,2.5,0.5,100,30). 


比较 目标 困 数 取 最 小 值 时 的 上 月 变量 ,如 表 14-2 所 示 。 


表 14-2 


—0. 568 652 265 006 235 


比较 不 同 粒 子 群 规模 下 的 目标 函数 值 和 最 小 值 


.461 280 538 391 346 


S00 


.490 268 156 O078 420 


| 

Xs . 408 370 995 746 921 一 0. 452 788 770 991 822 .495 317 061 863 384 
zs 0. 0 288 416 005 345 963 | —0.388 174 768 325 847 ). 508 017 090 877 808 
zx .0 552 338 567 227 23] . 401 507 545 198 533 .517 007 413 849 568 
zs .0738 166 644 789 645 .551 259 879 300 365 .477 354 073 247 202 
re . 280 868 118 500 682 .233 393 064 263 199 . 496 014 962 954 584 
x 0. 429 600 925 039 530 .271 896 675 443 476 . 489 607 302 876 620 
x ). 409 562 596 099 239 .547 844 449 351 226 . 493 034 422 510 953 
Xe .281 766 017 074 388 0. 380 278 337 003 657 0. 491 570 275 741 79] 
zi0 ). 587 883 598 964 542 .408 568 766 862 200 ). 505 298 045 536 549 
ll .749 463 199 823 46] .626 782 730 867 803 .503 117 287 033 364 
13 .0779 478 416 748 528 .349 408 282 182 953 .494 031 258 256 908 
ls .758 300 631 146 907 一 0. 583 408 316 780 879 500 060 685 658 700 
1 .180 131 709 578 965 .511 709 156 436 812 
X15 ). 564 532 674 933 458 一 0. 490 162 739 466 452 .517 812 810 910 794 
X16 0.0 637 266 236 855 537 | 一 0.555 105 474 483 478 .504 355 035 662 88] 
X17 0. 501 801 473 477 060 .560 793 363 305 467 ). 511 495 990 026 503 
rig ). 583 049 171 640 106 .641 197 096 800 355 .519 087 838 941 76] 
X19 ). 423 066 993 306 820 .594 790 333 100 089 . 497 402 575 677 108 
Tao 0. 463 031 353 118 403 .517 368 663 564 588 .506 039 272 612 50] 
i 0. 226 652 573 205 321 .647 922 715 489 912 .493 311 227 454 402 
X22 ). 340 694 973 324 611 .493 043 901 761 973 . 492 860 555 794 895 
ps 0. 303 590 596 927 068 .445 059 333 754 872 0. 499 654 192 041 048 
X24 0. 0 372 694 887 364 219 .602 557 014 069 339 ). 494 888 427 804 042 
Tgs ). 119 240 515 687 260 . 439 982 689 177 553 .519 431 562 496 152 
i ). 511 293 600 728 549 .260 811 072 394 469 . 493 925 264 779 633 
Ta7 0. 115 534 647 931 772 .738 686 510 406 502 0. 488 810 925 337 222 
a ). 559 536 823 964 912 . 494 057 140 638 969 .489 181 575 636 495 
X29 ). 446 461 621 552 828 .378 395 529 426 522 . 498 224 198 470 959 
so 0. 359 535 394 729 040 .402 673 857 684 666 .514 332 244 824 747 
目标 函数 最 加 i 
二 . 440 172 293 181 .045 295 621 546 .496 699 775 657 


从 表 14-2 中 可 以 看 出 ,粒子 群 规模 越 大 ,获得 解 的 精度 不 一 定 起 局 。 
综合 以 上 不 同 迫 代步 数 和 不 同 粒 于 群 规模 运 算得 到 的 结果 可 知 , 在 粒 于 群 算法 中 ， 
要 想 获 得 精度 高 的 解 , 关键 是 各 个 参数 之 间 的 合适 搭配 。 
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3. MATLAB 实现 


粒子 群 算法 经 营 与 其 他 算法 混 全 使用。 混合 策 上 略 就 是 将 其 他 进化 算法 或 传统 优化 
算法 或 其 他 技术 应 用 到 PSO 中 ,用 于 提高 粒子 多 样 性 、 增 强 粒 子 的 全 局 探索 能 力 ,或 者 提 
高 局 部 开发 能 力 .增强 收 伍 速度 与 精度 。 

稼 用 的 粒子 群 混合 方法 基于 例 疫 的 粒 于 群 算 法 。 该 算法 是 在 免疫 算法 的 基础 上 和 采 
用 粒子 群 优化 对 抗体 群体 进行 更 新 ,可 以 解决 免疫 算法 收敛 速度 慢 的 缺点 。 

基于 鲍 疫 的 混合 粒子 群 算法 步 桑 如下: 

(1) 确定 学 习 因 子 cl 和 cz、 粒子 (抗体 ) 群 体 个 数 MM 

《2) 由 logistic 回归 分 析 映 射 产生 M 个 粒子 (抗体 )zr; 及 其 速度 vi, 其 中 i 二 1,2,…， 
N ,最 后 形成 初始 粒子 (抗体 ) 群 体 Po 。 

(3) 生产 免疫 记忆 粒子 (抗体 )。 计 算 当 前 粒子 (抗体 ) 群 体 忆 中 粒子 (抗体 ) 的 适应 
值 并 判断 算法 是 否 满足 结束 条 件 , 如 果 满 足 , 则 结束 并 输出 结果 ,否则 继续 运行 。 

(4) 更 新 局 部 和 全 局 最 优 解 ,并 根据 下 面 公式 更 新 粒子 位 置 和 速度 ; 

Tj (ti 1) = x tt) TT vt 1), 7= 1,2,° od 
vai tt 1) = we vt) 十 crll 力 一 了 pit) | cerzsl pe,; — Ti,s Ct) | 

(5) 由 logistic 映射 产生 N 个 新 的 粒子 (抗体 )。 

(6) 基于 浓度 的 粒子 (抗体 ) 选 择 。 用 群体 中 相似 抗体 百分比 计算 生产 N 十 M 个 新 
粒子 (抗体 ) 的 概率 ,依照 概率 大 小 选择 NN 个 粒子 (抗体 ) 形 成 粒子 (抗体 ) 群 PP。 然 后 转 入 
第 3 步 。 

算法 流程 图 如 图 14-5 所 示 。 


由 logistic 鼎 里 生 产 M 个 粒 了 于 


生产 初始 抗体 


Ps | 通过 浓度 选择 机 制 ， 选 
Rr |_ 择 出 N 个 合适 的 粒子 


结束 


计算 粒子 适应 值 


/ 形成 M+N 个 粒 于 群体 
更 新 局 部 和 全 局 最 优 解 


更 新 粒子 位 置 和 速度 由 logistic 映 射 生产 N 个 粒子 


图 14-5 免疫 粒子 群 算法 流程 


将 实现 自 适 应 权重 的 优化 函数 命名 为 PSO_immu, 在 MATLAB 中 编写 实现 以 上 步 
又 的 代码 如 下 : 


function [x,vy, Result] = PSO immul(func,N,cl,c2,w, MaxDT,D, eps,DS,replaceP, minD, Psum) 
format long; 


第 第 第 第 笔 第 绍 定 初 嬉 化 条 件 千 第 第 第 第 第 第 第 第 竺 第 第 第 第 第 第 第 第 第 第 第 和 第 第 人 第 秆 第 
cl= 2; 和 学 可 因子 1 

0 和 学 习 因 子 2 

$% w= 0.8; 秆 惯性 权重 

$% MaxDT = 100; 委 最 大 选 代 次 数 

种 D=2; 竺 搜索 空间 维 数 (未 知 数 个 数 ) 

$%S N=100; 和 初始 化 群体 个 体 数 目 

$% eps=10^(—10); 和 设置 精度 (在 已 知 最 小 值 时 候 用 ) 

% DS=8; 多 每 隔 DS 次 循环 就 检查 最 优 个 体 是 否 变 优 
% replaceP = 0.5; 竺 粒子 的 概率 大 于 replaceP 将 被 免疫 替换 
$% minD= le— 10; 和 粒子 间 的 最 小 距离 

$S Psum= 0; 和 个 体 取 佳 的 和 


range = 100; 
Count = 0.; 
第 第 第 第 第 第 初始 化 种 群 的 个 体 秆 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 慎 
for i=1:N 


ior 1=1:D 
x(i,j) =— range + 2 * range * rand; 和 随机 初始 化 住 置 
v(i,j) = randn; 秆 随机 初始 化 逼 度 
end 


end 
害 害 害 宕 害 秆 第 秆 第 害 害 害 害 害 守 第 第 第 秆 害 害 害 害 守 和 害 害 秆 秆 害 害 害 害 害 守 第 第 第 第 害 宪 守 饥 
先 秆 竺 竺 先 计 算 各 个 米子 的 适应 度 , 并 初 她 化 pi 和 pg 第 和 第 第 笔 人 第 第 第 第 第 千 第 秆 秆 第 第 秆 第 
for i=1:N 

p(i) = feval(func, x(i, :)):; 


Yli,:) = x(1,:); 
end 
C2 秆 pg 为 全 局 最 优 
for1i=2:N 
if feval(func,x(i,:))<feval(func,pg) 
EI = 1) 
end 
end 
害 守 第 害 竺 宕 秆 害 害 第 害 秆 害 秆 第 和 害 第 害 害 害 害 第 害 秆 害 害 秆 守 第 害 秆 第 害 秆 宕 慎 
秆 第 秆 第 主 循环 ,按照 公式 依次 选 代 , 直 到 满足 精度 要 求 竺 告 第 第 第 第 % 
for t= 1:MaxDT 
for i1=1:N 
v(i,::) =w vi,:) +cl x randx (vy(i,:}— x(i,:})+c2x randx (pg — x(i,:)):; 
人 
if feval(func, x(i, :))<p(i) 
p(i) = feval(func,x(i, :)); 
Wh 
eTid 
IE p(i)< feval(func,pg) 
Pq yl) 
subplot(1,2,1):; 
bar( pg 0. 25 ); 
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axis([0 3 一 4040 ]) ; 
title (['Iteration ', num2str(t) ]) : pause (0.1); 
subplot(1,2,2):; 
plot(pg(1,1),pg(1,2), 'rs', 'MarkerFaceColor', 'r', 'MarkerSize',8) 
hold on; 
plot(x(:,1),x(:,2), k. '); 
set(gca, 'Color', 'g') 
hold off.: 
grid on; 
axis([ — 100 100 — 100 100 ]). 
title(['Global Min = ' ,num2str(p(1)) ]); 
xlabel(['Min x= ',num2str(pg(1,1}))}),' Min y= ',num2str(pg(1,2)) 1]1); 


end 

end 

Pbhest(t) = feval(func, pg) ; 
第 if Foxhole(pg,D)< eps 多 如 果 结 果 满 足 精 度 要 求 , 则 跳出 循环 
审 break:; 
对 end 
竺 第 竺 竺 秆 开始 进行 沈 疲 审 千 第 第 第 第 第 第 秆 第 种 秆 第 第 秆 竺 包 

i 七 > DS 


if mod(t,DS) == 0 && (Pbest(t— DS+1)— Phest{(t))<1le— 020 
千 如 果 和 连续 DS 代数 ,群体 中 的 最 优 没有 明显 变 优 , 则 进行 免疫 
对 在 函数 测试 的 过 程 中 发 现 , 经 过 一 定 代 数 的 更 新 ,个体 最 优 不 完全 相等 ,但 变化 非常 非常 小 
for 1i=1:N 名 计 算出 个 体 最 优 的 和 


Psum = Psum+ p(i); 


end 
for i=1:N 秆 锡 疲 程 厅 
for J=1:N 当 计 算 每 个 个 体 与 个 体 工 的 距离 
distance(j) = abs(p(j) - p(1)); 
end 
num=0; 
for j=1:N 和 计算 与 第 个 个 体 距 离 小 于 minD 的 个 数 
if distance(j)< minD 
num= num+ 11; 
end 
end 
PF(i) = p(N- i+1)/Psum; 多 计算 适应 度 概 率 
PD(i) = num/N; 各 计算 个 体 浓度 
a = rand; 名 随机 生成 计算 兰 撞 概率 的 因子 
PR(i)=ax PEF(i)+(1--a) x* PD(i); 多 计算 圭 搁 概率 
end 


fori=1:N 
IE PR(1)> replaceP 
x(i,:) = 一 range + 2 *% range x* rand(1,DnD):- 
Count = count++1; 
end 
end 


End 
end 
end 


第 竺 竺 第 第 第 第 了 好 后 给 出 计算 结果 第 第 第 第 竺 第 第 第 第 第 第 第 第 千 第 第 第 第 千 名 
x= pg(1,1); 
Y= pg(1,2); 
Result = feval(func, pg):; 
第 秆 第 人 竺 第 第 第 第 第 第 算法 阁 来 秆 第 第 守 什 秆 人 第 竺 第 第 第 秆 第 第 竺 人 第 竺 第 
function probabolity(N, i) 
PF = p(N— i)/Psum; 多 适应 度 概率 
disp( PF ); 
for Jj]=1:N 
distance(jj) = abs(P(jj) - P(i) ); 
end 
num= 人 0; 
for 1i=1:N 
IE distance(1ii)<minD 


num= num+t1; 


end 
end 
PD = num/N; 多 个体 深 度 
PR=axPF+ (1—a) x PD; 币 替换 概率 


【 例 14-2】 使 用 基于 模拟 退火 的 混合 粒子 群 算 法 :求解 上 晒 数 
cos(z1 x2)—1 
Ld [1 Cri To— xi) | 
最 小 值 ,其 中 一 10 达 xz; 这 10。 粒 子 数 为 50, 学 习 因 子 均 为 2, 退 火 和 常数 取 值 0.6, 友 代步 数 
困 1000 。 
首先 建立 目标 限 数 代码 如 下 : 


上 -0.5 


function y= immuFunc(x) 
y= (cos(x(1)*2+ x(2)*2) -1)/((1i+ (x(1)*2- x(2)*2)})*2) +0.5; 


end 


在 MATLAB 命令 行 窗口 输入 代码: 


[xm,fv| = ESO immu ((@ immuFunc, 50,2,2,0.8,100,5,0.0000001,10,0.6, 
0.000000000000000000].,0) 


运行 后 得 到 结果 如 下 : 


>> xm = 
1.139888959718036 


— 1.515992561220435 


471 | 
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得 到 目标 隐 数 取 最 小 值 时 的 日 变量 xm 变化 图 如 图 14-6 所 示 。 


lteration 93 Global Min=-1.9063 
40 1( 


30 


局 
[mm 


一 一 | 


-100 
| 2 3 -100-50 0 50 100 
Min.=44.2915 Min,=—44.2926 


图 14-6 目标 函数 取 最 小 值 时 的 自 变 量 xm 变化 图 


14.3.2 遗传 算法 的 MATLAB 实现 


过 传 算法 (Cgenetic algorithm) 是 模拟 自然界 生 物 进 化 机 制 的 一 种 算法 , 即 体 循 适 者 
生存 ,优胜 劣 法 的 法 则 也 就 是 寻 优 过 程 中 有 用 的 保留 无 用 的 则 去 除 。 在 科学 和 生产 实战 
中 表现 为 在 有 所 有 可 能 的 解决 方法 中 找 出 最 付 合 该 问题 所 要 求 的 条 件 的 解决 方法 , 即 找 出 
一 个 最 优 解 。 


1. 基本 原理 


遗传 操作 是 模拟 生物 基因 遗传 的 做 法 。 在 遗传 算法 中 ,通过 编码 组 成 初始 群体 后 ， 
遗传 操作 的 任务 就 是 对 群体 的 个 体 按照 它们 对 环境 适应 度 ( 适 应 度 评估 ) 施 加 一 定 的 操 
作 , 从 而 实现 优胜 劣 汰 的 进化 过 程 。 从 优化 搜索 的 角度 而 言 , 遗 传 操 作 可 使 问题 的 解 ,一 
代 又 一 代 地 优化 ,并 通 近 最 优 解 。 

遗传 算法 过 程 如 图 14-7 所 示 。 

遗传 操作 包括 以 下 三 个 基本 遗传 算 子 genetic operator): 选择 (selection)、 丰 又 
(crossover) 、 谈 愤 (mutation) 。 

个 体 遗 传 算 子 的 操作 都 是 在 随机 扰动 情况 下 进行 的 。 因 此 ,群体 中 个 体 回 最 优 解 迁 
移 的 规则 是 随机 的 。 需 要 强调 的 是 ,这 种 随机 化 操作 和 传统 的 随机 搜索 方法 是 有 区 别 的 。 
超 传 操作 进行 的 是 高 效 有 回 的 搜索 ,而 不 是 如 一 般 随 机 搜索 方法 所 进行 的 无 加 搜索。 

遗传 操作 的 效果 和 上 述 三 个 遗传 算 子 所 取 的 操作 概率 、 编 码 方 法 、 群 体 大 小 、 初 始 群 
体 以 及 适应 度 子 数 的 设 定 密 切 相关 。 

1) 选择 

从 群体 中 选择 优胜 的 个 体 , 淘 汰 劣质 个 体 的 操作 叫 作 选择 。 选 择 算 子 有 时 叉 称 为 再 
生 算 子 (Creproduction operator)。 选 择 的 目的 是 把 优化 的 个 体 直 接 遗 传 到 下 一 代 或 通过 
配对 交叉 产生 新 的 个 体 再 遗传 到 下 一 代 ，。 


确定 实际 问题 
参数 集 


对 参数 集 进行 编码 


初始 化 群体 Pm 


产生 新 一 代 群 休 


(D 位 串 解码 的 参数 + 评价 群体 
(2) 计算 目标 函数 值 

(3) 函数 值 向 适应 值 映 射 
(4) 适应 值 调 整 a 


图 14-7 遗传 算法 过 程 


选择 操作 是 建立 在 群体 中 个 体 的 适应 度 评估 基础 上 的 ,目前 常用 的 选择 算 子 有 以 下 
几 种 : 适应 度 比 例 方 法 .随机 遍历 抽样 法 .局 部 选择 法 。 

其 中 :, 轮 盘 赌 选择 法 (roulette wheel selection) 是 最 简单 也 是 最 各 用 的 选择 方法 。 在 
该 方法 中 ,各 个 个 体 的 选择 概率 和 其 适应 度 值 成 比例 。 设 群体 大 小 为 n, 其 中 个 体 i 的 适 
应 度 为 fi; 则 i 被 选择 的 概率 为 


P; = f/f 

显然 ,概率 反映 了 个 体 i 的 适应 度 在 整个 群体 的 个 体 适 应 度 总 和 中 所 占 的 比例 。 个 
体 适 应 度 越 大 ,其 被 选择 的 概率 就 越 高 ,反之 亦 然 。 

计算 出 群体 中 各 个 个 体 的 选择 概率 后 ,为 了 选择 交配 个 体 , 需 要 进行 多 轮 选 择 。 每 
一 轮 产 生 一 个 L0,1j 之 则 均匀 随机 数 , 将 该 随机 数 作 为 选择 指针 来 确定 被 选 个 体 。 

个 体 被 选 后 ,可 随机 地 组 成 配对 .以 供 后 面 的 交叉 操作 。 

2) 友 叉 

在 自然 界 生 物 进 化 过 程 中 起 核心 作用 的 是 生物 遗传 基因 的 重组 ( 扣 上 变异 )。 同 样 ， 
遗传 算法 中 起 核心 作用 的 是 遗传 操作 的 交叉 算 子 。 所 请 交 又 ,是 指 把 两 个 父 代 个 体 的 部 
分 结构 加 以 苦 换 重组 而 生成 新 个 体 的 操作 。 通 过 交叉 ,遗传 算法 的 搜索 能 力 得 以 飞跃 
担 高 。 

交叉 算 了 于 根据 交 文 率 将 种 群 中 的 两 个 个 体 随 机 地 交换 某 些 基因 ,能 够 产生 新 的 基因 
组 合 . 期 望 将 有 益 基 因 组 合 在 一 起 。 根 据 编 码 表 示 方 法 的 不 同 , 可 以 有 以 下 算法 : 

(1) 实 值 重组 (real valued recombination) 

OO) 离散 重组 (discrete recombination ) ; 

加 中间 重 组 Gintermediate recombination ) ; 


二 
te 

人 
L 
短 
能 
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@G) 线性 重组 (linear recombination); 

ddd) 扩展 线性 重组 Cextended linear recombination)。 

(2) 二 进 制 交叉 (binary valued crossover) 

中 单 点 丰 叉 (single-point crossover); 

加 ) 和 允 点 区 叉 (multiple-polint crossover); 

名) 均匀 丰 叉 (uniform crossover):; 

() 洗 脾 下 叉 (shutfle crossover); 

3) 纺 小 代理 丰 叉 (crossover with reduced surrogate) 。 

最 沼 用 的 交叉 算 子 为 单 点 交叉 。 上 有 具体 操作 是 : 在 个 体 串 中 随机 设 定 一 个 交叉 点 , 实 
行 交 叉 时 ,该 点 前 或 后 的 两 个 个 体 的 部 分 结构 进行 互 换 , 并 生成 两 个 新 个 体 。 下 面 给 出 
村 单 点 交 又 的 一 个 例子 : 

个 体 A:1001+4111 一 1001000 新 个 体 

个 体 B,0011 不 000 一 0011111 新 个 体 

3) 变异 

变异 算 子 的 基本 内 容 是 对 群体 中 的 个 体 串 的 某 些 基因 座 上 的 基因 值 做 变动 。 依 据 
个 体 编码 表示 方法 的 不 同 , 可 以 有 以 下 算法 : 

二进制 变异 。 

一 般 来 说 ,变异 算 子 操作 的 基本 步骤 如 下 : 

(1) 对 群 中 所 有 个 体 以 事先 设 定 的 变异 概率 判断 是 否 进行 变异 。 

(2) 对 进行 变异 的 个 体 随 机 选择 变异 位 进行 变异 。 

遗传 算法 引入 变异 的 目的 有 两 个 : 一 是 使 遗传 算法 具有 局 部 的 随机 搜索 能 力 。 当 址 
传 算 法 通过 交叉 算 子 已 接近 最 优 解 邻 域 时 ,利用 变异 算 子 的 这 种 局 部 随机 搜索 能 力 可 以 
加 速 回 最 优 解 收敛 。 显 然 , 此 种 情况 下 的 变异 概率 应 取 较 小 值 ,否则 接近 最 优 解 的 积木 
块 会 因 变 异 而 遭 到 破坏 。 二 是 使 遗传 算法 可 维持 群体 多 样 性 :以 防止 出 现 未 成 束 收 敛 现 
象 。 此 时 收 和 敛 概率 应 取 较 大 值 。 

遗传 算法 中 ,交叉 算 子 因 其 全 局 搜索 能 力 而 作为 主要 算 子 ,变异 算 子 因 其 局 部 搜索 
能 力 而 作为 辅助 算 于 。 

遗传 算法 通过 交叉 和 变异 这 对 相互 配合 又 相互 区 争 的 操作 而 使 其 具备 菲 顾 全 局 和 
局 部 的 均衡 搜索 能 力 ，。 

所 谓 相 互 配合 ,是 指 当 群体 在 进化 中 陷于 搜索 空间 中 某 个 超 平面 而 仅 徘 交叉 不 能 摆 
脱 时 ,通过 变异 操作 可 有 助 于 这 种 摆脱 。 

所 谓 相 互 疯 争 ,; 是 指 当 通过 交叉 已 形成 所 期 望 的 积木 块 时 ,变异 操作 有 可 能 破坏 这 些 
积木 块 。 如 何 有 效 地 配合 使 用 交叉 和 变异 操作 ,是 目前 遗传 算法 的 一 个 重要 人 研究 内 容 。 

基本 变异 算 子 是 指 对 群体 中 的 个 体 码 串 随 机 挑选 一 个 或 多 个 基因 座 并 对 这 些 基 因 
座 的 基因 值 做 变动 。(0.,1) 二 值 码 串 中 的 基本 变异 操作 如 下 : 

(个 体 A)10010110 | 10001 10( 个 体 A) 

注意 : 在 基因 位 下 方 标 有 x 号 的 基因 发 生变 前 。 


般 取 0. 001 一 0. 1 。 


升 时 ,或 者 迭代 次 数 达 到 预 设 的 代数 时 ,算法 终止 。 预 设 的 代数 一 般 设 置 为 100 一 


变异 座 的 选取 一 般 受 种 群 大 小 、 染 人 色 体 长 度 每 因素 的 影 啊 。 通 党 选取 很 小 的 值 , 


4) 终止 条 件 
当 最 优 个 体 的 适应 度 达 到 给 定 的 国 值 ,或 者 最 优 个 体 的 适应 度 和 群体 适应 度 不 再 上 
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500 代 。 


2. 程序 设计 
为 了 更 好 地 在 MATLAB 中 使 用 遗传 算法 ,本 部 分 主要 对 遗传 算法 的 程序 设计 和 


MATLAB 工具 箱 进 行 讲解 。 


随机 初始 化 种 群 Pi) 一 1zl:zz :za ,计算 PCO) 中 个 体 的 适应 值 。 其 MATLAB 


程序 的 基本 格式 如 下 : 


Begin 
七 三 上 
初始 化 P(t) 
计算 B(t) 的 适应 值 ; 
while (不 满足 停止 准则 ) 
do 
begin 
七 二 七 十 1 
从 P(t+1) 中 选择 P(t) 
重组 P(t) 
计算 P(t}) 的 适应 值 


end 


【 例 14-3】 求 下 列 函 数 的 最 大 值 。 

f(r) 一 10xsin(5z) 十 7xcosC4r)， 其 中 x € [0,15] 
1) 初始 化 
Psp m 图 数 的 功能 是 实现 群体 的 初始 化 ,popsize 表示 和 群体 的 大 小 ,chromlength 
染色 体 的 长 度 ( 二 值 数 的 长 度 ) ,长 度 大 小 取决 于 变量 的 二 进 制 编码 的 长 度 。 
0 MATLAB 子 程序 如 下 : 


第 初始 化 

function pop = initpop(popsize, chromlength) 

pop = round(rand(popsize, chromlength) ); 

各 rand 随机 产生 每 个 单元 为 {0,1} 行 数 为 popsize, 列 数 为 chromlength 的 矩阵 ， 
千 round 对 纸 阵 的 每 个 单元 进行 圆 整 


end 


2) 目标 函数 值 
(1) 二 进 制 数 转化 为 十 进 制 数 。 遗 传 算法 MATLAB 子 程 序 如 下 : 
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function pop2 = decodebinary(Pop) 
[px, p¥| = size(pop); 

当 求 Pop 行 和 列 数 

for i1=1:py 


popll:,1)= 2.*(pyY— 1). * pop(:, 1); 
end 

Pop2 = sum(popl, 2); 

秆 未 popl 的 每 行 之 和 

end 


(2) 二 进 制 编码 转化 为 十 进 制 数 。decodechrom. m 函数 的 功能 是 将 染色 体 ( 或 二 进 
制 编码 ) 转 换 为 十 进 制 数 ,参数 spoint 表示 待 解码 的 二 进 制 串 的 起 始 位 置 。 

对 于 多 个 变量 而 言 ,如 有 两 个 变量 ,采用 20 位 表示 ,每 个 变量 10 位 , 则 第 一 个 变量 
从 工 开始 ,万 一 个 变量 从 11 开始 。 参 数 length 表示 所 截取 的 长 度 。 

遗传 算法 MATLAB 子 程序 如 下 : 


当 将 二 进 制 编码 转 摘 成 十 进 制 数 

function pop2 = decodechrom(Pop, spoint, length) 
popl = pop( :, spoint :spoint + length— 1); 

pop2 = decodebinarvy(popl ); 

end 


(3) 计算 目标 函数 值 。calobjvalue. m 函数 的 功能 是 实现 目标 函数 的 计算 . 
遗传 算法 MATLAB 子 程序 如 下 : 


function [objvalue] = calobjvalue( pop) 


templ = decodechrom( pop, 1, 10); 名 将 pop 每 行 转 化 成 十 进 制 数 

x= templ x 10/1023: 先 将 二 值 域 中 的 数 转 化 为 变量 域 中 的 数 
objvalue = 10 x sin(5 x x) + 7x cos(4d * x); 和 计算 目标 函数 值 

end 


各 计算 个 体 的 适应 值 
function fitvalue = calfitvalue(lobjvalue) 
global Cmin:; 
Cmin=0; 
[px, PY¥| = size(objvalue):; 
for i=1 :px 
if objvalue(i) + Cmin>0 
temp = Cmin + objvalue( 1); 
elSse 
temp = 0.0; 
end 


fitvalue(i) = temp; 


end 

fitvalue = fitvalue' 
罗 

4) 选择 复制 -~ 
法 


选择 或 复制 操作 是 决定 哪些 个 体 可 以 进入 下 一 代 。 程 序 中 采用 轮 盘 赌 选择 法 选择 ， 
这 种 方法 较 易 实现 。 根 据 方程 P; 二 户 / 六 二 fi/ fsm， 选 择 步 又 如 下 : 

(1) 在 第 + 代 , 计 算 fm 和 PP;。 

(2) 产生 {10,1} 的 随机 数 rand( . ) , 求 * 一 rand( .) x fom。 


(3) 求 > 广 三 > 中 最 小 的 A , 则 第 个 个 体 被 选中 。 


(4) 进行 N 次 (2)、(3) 操 作 , 得 到 NN 个 个 体 ,成 为 第 上 一 上 十 1 代 种 群 。 
遗传 算法 MATLAB 了 于 程序 如 下 : 


各 选择 复制 

function [newpop|] = selectionl( pop, fitvalue) 

totalfit = sum(fitvalue).; 第 求 适 应 值 之 和 

fitvalue = fitvalue/totalfit:; 和 单个 个 体 被 选择 的 概率 

fitvalue = cumsum(fitvalue):; om fitvalue=[1234], 则 cumsum(fitvalue)}=[136 10] 
[ px, pyY] = size(pop); 

ms = sort(rand(px,1)); 名 从 小 到 大 排列 


fitin=1; 
newin=1; 
while newin < = px 
if(ms{(newin) }< fitvalue(fitin) 
newpop(newin) = pop(fitin): 
Newin = newin+1.; 


记 ] 写 记 
£1itin = fitin+1- 
end 
end 
5) 交叉 


辞 体 中 的 每 个 个 体 之 间 部 以 一 定 的 概 座 也. 交 文 , 即 两 个 个 体 从 各 日 字 和 从 串 的 条 
位 置 (一 般 是 随机 确定 ) 开 始 互 相交 换 , 这 类 似 生 物 进化 过 程 中 的 基因 分 裂 与 重组 。 
例如 ,假设 两 个 父 代 个 体 ri 、xz 为 : 
工 1 O100110 
Tz 一 1010001 
从 每 个 个 体 的 第 3 位 开始 交叉, 交叉 后 得 到 两 个 新 的 子 代 个 体 wm、 ys 分 别 为 : 
yi 一 0100001 
yz 一 1010110 
这 样 两 个 子 代 个 体 就 分 别 具 有 了 两 个 父 代 个 体 的 某 些 特征 。 
利用 交叉 有 可 能 由 父 代 个 体 在 子 代 组 合成 具有 更 高 适合 度 的 个 体 。 事 实 上 ,交叉 是 
遗传 算法 区 别 于 其 他 传统 优化 方法 的 主要 特点 之 一 。 


MATLAB 科 学 计算 
壮 传 算法 MATLAB 子 程 序 如 下 : 


Ee 
function [newpop|] = crossover( pop, pc) 
[px, PY] = size(pop); 
newpop = ones( sizel( pop)); 
for 1=1:2:px—1 
if(rand < pc) 
cpoint = round(rand x py); 
newpop(i,:)= [pop(i,1:cpoint),pop(i+1,cpoint+1:py)]; 
newpop(i+1,:)= [pop(i+1,1:cpoint),pop(i,cpoint + 1:;pyY)|]; 
a 
newpop(i, :) = pop(1); 
newpop(i+1,:)}= pop(i+ 1); 
enid 
end 


基因 的 突变 普 裔 存在 于 生物 的 进化 过 程 中 。 人 变异 是 指 父 代 中 的 每 个 个 体 的 每 一 位 


都 以 概率 Ps 翻转 , 即 由 1 变 为 0, 或 由 0 变 为 1。 


遗传 算法 的 变异 特性 可 以 使 求解 过 程 随机 地 搜索 到 解 可 能 存在 的 整个 空间 ,因此 可 
以 在 一 定 程 度 上 求 得 全 局 最 优 解 。 
让 传 算 法 MATLAB 子 程序 如 下 : 


当 变异 
function [newpop| = mutation( pop, pm) 
[px, PY] = size( pop); 
newpop = ones(size(pop)):; 
for 1= 1 :px 
if (rand < pm) 
mpoint = round(rand x py); 
if mpoint <=0 
mpoint=1; 
end 
newpop(i) = pop(i); 
if any(newpop(i,mpoint)) ==0 
newpop(i,mpoint)=1.; 
el]se 
newpop(1,mpoint)}) = 0; 
end 
Else 
newpop(1i) = pop(i); 
end 
end 


7) 求 出 群体 中 最 大 的 适应 值 及 其 个 体 
计 传 算法 MATLAB 子 程 序 如 下 : 


当 求 出 群体 中 适应 值 了 最 大 的 值 


function [bestindividual, bestfit] = best(Pop, fitvalue) 


[px, PY] = size(pop); 
bestindividual = pop(1, :); 
bestfit = fitvalue(1); 
for 1i1=2:px 
if fitvalue(1i)> bestfit 
bestindividual = pop(i, :); 
bestfit = fitvalue(i); 
end 
end 


8) 主 程序 


中 传 算 法 MATLAB 主 程序 如 下 : 


clear all 

Clc 

popsize = 20; 

chromlength = 10，; 

pec=0.7; 

pm= 0.005; 

pop = initpop(popsize, chromlength).; 
fori=1:20 

[objvalue] = calobjvalue (pop); 
fitvalue = calfitvalue(objvalue); 
[newpop| = selection( pop, fitvalue).; 
[newpop| = crossover (pop, pc); 
[newpop|] = mutation!( pop, pc ); 


[bestindividual, bestfit] = best(pop, fitvalue).; 


y(i) = max(bestfit).; 
n(1i1})}=1; 
Pop5 = bestindividual; 


多 群体 大 小 

第 字符 事 长 度 ( 个 体 长 度 ) 

竺 交叉 概率 

多 变 开 概 这 

秆 随机 产生 初始 群体 

秆 20 为 选 代 次 数 

竺 计算 目标 函数 

当 计 算 群 体 中 每 个 个 体 的 适应 度 
多 复制 

第 变 叉 

当 变异 

第 求 出 群体 中 适应 值 最 大 的 个 体 及 其 适应 值 


x(i) = decodechrom(pop5, 1, chromlength) x 10/1023; 


PoP = DewPOP， 
end 


fplot('9 % sin(S x x) + 8x cos(4*x x)',[0 15]1) 


hold on 
plot(x,v, rx* ') 
hold off 


运行 主 程 厅 ,得 到 结 采 如 图 14-8 所 示 。 
注意 : 站 传 算法 有 四 个 参数 需要 提前 设 定 ， 


一 般 在 以 下 范围 内 进行 设置 : 
(1) 群体 大小 一 一 20 一 100， 


(2) 遗传 算法 的 终止 进化 代数 一 一 100 一 


500。 
(3) 交叉 概率 一 0. 4 一 0. 99 。 
(4) 变异 概率 一 一 0.0001 一 0. 1。 


0 5 10 15 


图 14-8 遗传 算法 仿真 结果 
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3. MATLAB 实现 


旅行 商 问 题 (Ctraveling salesman problem,TSP), 也 称 贷 即 担 问题 ,是 数学 领域 中 的 
著名 问题 之 一 。TSP 问题 已 经 被 证 明 是 一 个 NP-hard 问题 ,由 于 TSP 问题 代表 一 类 组 
从 优化 问题 ,因此 对 其 近似 解 的 全 究 一 二 是 算法 设计 的 一 个 重要 问题 。 

TSP 问题 从 描述 上 来 看 是 一 个 非常 简单 的 问题 ,给 定 n 个 城市 和 各 城市 之 间 的 距 
离 ,寻找 一 条 遇 历 所 有 城市 且 每 个 城市 只 被 访问 一 次 的 路 径 :, 并 保证 总 路 径 距 离 最 短 。 
其 数学 描述 如 下 : 

设 G 三 (V ,EE) 为 赋 权 图 ,v 二 41,2,…,n}) 为 项 点 集 ,E 为 边 集 ,各 顶点 则 距离 为 Cis， 
已 知 Csy 守 0, 且 i,7Ev, 并 设 定 : 

1 最 优 路 径 
”Lo 其 他 情况 
那么 整个 TSP 问题 的 数学 模型 表示 如 下 : 
min Z 一 >》 Ca 
i 


区 To 
3 


<- : 曾 -站 村 EE 10.1} ,1 EE Us] EE TT 
| Szrs <l#l-1, kc 
(fjEs 


式 中 ,k 是 wv 的 全 部 非 空子 集 ; |k| 是 集合 有 中 包含 图 G 的 全 部 顶点 的 个 数 。 

遗传 算法 求解 TSP 的 基本 步骤 如 下 : 

(1) 种 群 初始 化 。 个 体 编 码 方法 有 二 进 制 编码 和 实数 编码 ,在 解决 TSP 问题 过 程 中 
个 体 编码 方法 为 实数 编码 。 对 于 TSP 问题 ,实数 编码 为 1 一 n 的 实数 的 随机 排列 ,初始 化 
的 参数 有 种 群 个 数 M 染色 体 基 因 个 数 六 ( 即 城市 的 个 数 ) .迭代 次 数 C、 交 叉 概 率 P.、 变 
寞 概率 | 

(2) 适应 度 函 数 。 在 TSP 问题 中 ,对 于 任意 两 个 城市 之 间 的 距离 D(i,7) ,已 知 每 个 
染色 体 ( 即 nn 个 城市 的 随机 排列 ) 可 计算 出 总 距离 ,因此 可 将 一 个 随机 全 排列 的 总 距离 的 
倒数 作为 适应 度 函 数 , 即 距离 越 短 ,适应 度 函 数 越 好 ,满足 TSP 要 求 。 

(3) 选择 操作 。 遗 传 算法 选择 操作 有 轮 盘 赠 法 .锦标赛 法 等 多 种 方法 ,用户 根 据 实 际 
情况 选择 最 合适 的 算法 。 

(4) 交 义 操作 。 遗 传 算 法 中 交叉 操作 有 多 种 方法 。 一 般 对 于 个 体 , 可 以 随机 选择 两 
个 个 体 ,在 对 应 位 置 交 换 若 干 个 基因 片段 ,同时 保证 每 个 个 体 依 然 是 1 一 n 的 随机 排列 ， 
防止 进入 局 部 收敛 。 

(5) 变异 操作 。 对 于 变异 操作 ,随机 选取 个 体 , 同 时 随机 选取 个 体 的 两 个 基因 进行 交 
换 以 实现 变异 操作 。 

【 例 14-4】 随机 生成 一 组 城市 种 群 ,利用 遗传 算法 寻找 一 条 遍历 所 有 城市 且 每 个 城 
市 只 被 访问 一 次 的 路 径 , 且 总 路 径 距 离 最 短 的 方法 。 

根据 分 析 ,完成 MATLAB 主 聘 数 如 下 : 


秆 和 向 和 汗 逢 汕 第 省 和 和 要 和 汗 币 秆 囊 唐 秆 省 和 汗 和 当天 要 和 要 省 机 和 当 于 要 第 向 第 
第 第 第 秆 第 第 第 第 第 第 秆 第 第 主 到 数 告 千 第 第 第 第 秆 第 第 第 第 御 第 


Clear; 


Cu- 

第 第 第 人 秆 第 第 第 第 第 和 第 秆 第 输入 参数 第 第 第 第 第 第 秆 逢 秆 第 竺 和 % 
N= 10; 等 城市 的 个 数 

i 秆 种 群 的 个 数 

C= 100; 秆 读 代 次 数 

Cold= 0: 

站 二 2; 秆 适应 值 归 一 化 淘汰 加 速 指数 
Pc=0.4; 秆 交叉 概 举 

Pmutation = 0. 2; 先 变 开 概 兴 


第 秆 第 和 和 人 秆 第 第 多 生成 城市 的 坐标 竺 哇 第 第 第 知人 第 第 和 和 和 守 第 人知 御 第 
pos = randn(N,2); 


第 第 第 第 第 第 第 第 生成 城市 之 间距 离 答 阵 千 第 第 第 第 第 第 秆 第 第 秆 尼 
D = zeros(N, N) ; 
for i=1:N 
for j=1i+1:N 
dis = (pos(i,1) - pos(j,1)).*^2+ (pos(i,2) - pos(jv,2)).^2; 
D(i,j) = dis “(0.5); 
D(j,1i) = D(i,]); 
end 
end 


秆 害 争 害 第 秆 争 针 生成 初 姑 群 体 害 害 秆 秆 第 害 秆 争 第 秆 害 守 第 第 秆 和 害 逢 秆 害 饥 


popm = zeros(M, N); 
For 1i=1:M 
popm(i, :) = randperm(N); 


end 


秆 第 秆 秆 秆 秆 和 秆 随 机 选择 一 个 种 群 第 第 和 第 第 第 第 第 第 第 第 第 第 第 种 第 
R= popm(1, : ); 

fiqure(1); 
scatter(pos( :,1), pos(:,2) ,''k.'); 
xlabel(' 模 轴 ') 

ylabel(' 纵 轴 ') 

title(' 随 机 产生 的 种 群 图 ') 

axis([ -33 -33]); 

fiaqure(2); 

plot route(lpos, R); 

xlLabel( ' 横 轴 

Ylabel( ' 纵 轴 ") 

title( ' 随 机 生成 种 群 中 城市 路 径 情 况 ') 
xioll = 3 = 441: 


秆 秆 秆 秆 秆 御 秆 秆 初 始 化 种 群 及 其 适应 函数 第 第 秆 秆 和 第 秆 秆 秆 秆 害 弟 
fitness = zeros(M,]1): 


len= zeros(M,1): 


上 
Ll 
D 
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ER 
len(i,1) = myLength(D, Popm(I，:) ); 
end 
maxlen = max( len):; 
minlen = min( len):; 
fitness = fit(len,nm,maxlen,minlen).: 
rr= find(len== minlen): 
R= popm(rr(1,1),:); 
for i=1:N 
fprintf('%d ',R(i)); 
end 
fprintf(\n'); 
fitness = fitness/sum(fitness); 
distance min= zeros(C+1,1); 针 各 次 迁 代 的 最 小 的 种 群 的 距 高 
while C>=0 
fprintf(' 村 代 第 各 d 次 \n',C); 
千 秆 秆 秆 选择 操作 第 千 第 钙 
nn=0.; 
for i=1:size(popm,1) 
len 1(i,l1) = myLength(D, popm(i, :) ); 
= rand 0. 3; 


for j=1:size(popm,1) 
if fitness(j,1)>= jc 
m= mti+1.; 
popm_sel(nn, :) = popm(j, :); 
break; 
end 
end 
end 
和 第 第 名 每 次 选择 都 保存 最 优 的 种 群 竺 秆 御 钙 
Popm sel = popm sel(l:nn,:); 


[len m len index| = min(len 1); 

Popm sel = [popm sel;popm(len index,:)|; 
秆 竺 刍 秆 交叉 操作 特种 秆 针 

nnper = randperm( nn).; 

A= popm sel(nnper(1),:); 

B= popm sel(nnper(2),:); 

for i1=1:rm* Pc 

[A,B| = cross(A,B): 

popm_ sel(nmnper(1),:)= A; 

popm sel(nnper(2),:)=B; 


end 
竺 秆 守 秆 变 开 操作 御 秆 御 钊 
for i=1:nmm 

PICk = rand; 

while pick == 

Pick = rand:; 
end 
if pick <= Pmutation 
popm sel(i,:) = Mutation(popm sel(i,:)); 


end 
end 
第 第 第 秆 求 话 应 度 吉 数 第 第 第 钊 
NN = size(popm sel,1 ); 
len = zeros(NN,1):; 
for1i=1:NMN 
len(i,1) = myLength(D, popm sell(i, 
end 
maxlen = max( len); 
minlen = min( len); 
distance min(C+ 1,1) = minlen; 
fitness = fit(len,m,maxlen,minlen); 
rr= find(len== minlen): 
fprintf('minlen= d\n',minlen):; 
R= Popm sel(rr(l1,1),:)}); 
for i=1:N 
fprintf('%Sd ',R(21)).; 
end 
fprintf(\n'):; 
popm= | |]; 
Popm = popm sel; 
ee 
$ pausel( 1); 
end 
figure(3) 
plot route(pos, R); 
xlLabel( ' 横 轴 ") 
ylabel(' 纵 轴 ') 
title( ' 优 化 后 的 种 群 中 城市 路 径 情 况 ') 
二 


主 函 数 中 用 到 的 函数 代码 如 下 : 
1) 适应 度 函 数 代码 


第 第 秆 秆 第 秆 秆 秆 话 应 度 消 燥 秆 第 秆 和 第 第 秆 秆 秆 秆 种 和 人 秆 种 秆 秆 秆 秆 御 针 


function fitness = fit(len,nm,maxlen, minlen) 


fitness = len; 
for i=1:1length( len) 


fitness(i,1}) = (1— (len(i,1) - minlen)})/(maxlen— minlen+0.0001)).“*m: 


end 
end 


2) 计算 个 体 距离 函数 代码 


竺 第 秆 秆 竺 第 第 秆 计算 个 体 距 离 函 数 秆 第 第 千 第 秆 第 第 第 第 御 % 


function len = myLength(D, p) 
[N,NN| = size(D):; 
Ten = D(p( 1,N),p(1,1)); 
for i1=1:(N—-1) 


下 


len= len+ Dpl1l,1),.pl1i,1i+1)); 
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end 
end 


3) 友 叉 操作 哨 数 代 码 


秆 秆 秆 第 第 第 第 第 变 丸 操作 遂 数 第 第 第 秆 秆 和 和 害 秆 第 秆 第 第 第 秆 秆 秆 秆 秆 御 第 
function [A,B|] = cross(A,B) 
L= length(A); 
if L<10 
W = LL; 
elseif ((L/10) ~- floor(L/10))> = randggL > 10 
W= ceil(L/10) +8; 
lSse 
W= floor(L/10)+8.; 
end 
p= unidrnd(L— W+1).; 
fprintf('p= S$%d',p); 
for 1=1:W 
x= find(A== B(1,p+i—1)); 
y= find(B== A(l,p+1i—1)); 
[A(1l,p+1i-—-1),B(1l,p+i--1)|]= exchange(A(1l,p+1i-1),B(l,p+1i-—1)):; 
[A(1,x),B(1,y)|] = exchange(A(1,x),B(1,Yy)); 
end 
end 


4) 对 调 隐 数 代码 


秆 千 知 和 害 千 秆 第 第 对 调 函 数 逢 逢 千 第 秆 第 第 害 第 害 千 第 和 害 逢 害 害 第 秆 第 第 
function [x,y] = exchange(x, Y) 
temp = x; 
= 
Y= temp; 
end 


5) 变异 函数 代码 


第 第 第 第 第 第 第 第 栾 上 大 润 燥 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 % 
function a= Mutation(A) 
Indexl = 0; index2 = 0.， 
nnper = randperm(size(B,2)).; 
indexl = mnnper(1) ， 
index2 = nnper(2); 
Sfprintf('indexl] = $d ',index] ).; 
Sfprintf('index2= sd ',index2).; 
temp= 0; 
temp = A(indexl ).; 
A(indexl) = A(index2 ) ; 
A( index2) = temp; 


= A; 
[ne 


6) 绘制 连 点 曲线 畏 数 代码 


第 秆 秆 秆 第 第 第 秆 和 连 点 六 图 池 数 第 第 第 第 第 第 秆 第 第 第 第 秆 第 第 秆 秆 第 第 秆 第 第 秆 秆 汗 


function plot route(a,R) 
scatter(a(:,l1),a(:,2)}), ''rx'); 
hold on; 


plot([a(R(1),1),a(R(length(R}))}),1)],[la(R(1),2),a(R(length(R) ),2) |]); 


hold on; 

for i=2:length(R) 
x0=a(R(1i— 1),1): 
YO0=a(R(i— 1),2); 
1 — alR(i) TI 
Yl =a(R(1i),2); 
xx= [x0,xl]; 
y¥Y = |[y0,Y1]; 
plot (xx, YY) ; 
hold on; 

end 


end 


运行 主 程序 ,得 到 随机 产生 的 城市 种 群 图 如 
图 14-9 所 示 , 随机 生成 种 群 中 城市 路 径 情 总 如 


图 14-10 所 示 。 


从 图 14-9 中 可 以 看 出 ,速记 产生 的 种 群 城市 点 
不 对 称 ,也 没有 规律 ,用 一 般 的 方法 很 难得 到 其 最 优 
路 径 。 从 图 14-10 中 可 以 看 出 :随机 产生 的 路 径 长 度 


很 长 , 空 行 浪费 比较 多 。 


运行 址 传 算法 ,得 到 如 图 14-11 所 示 的 城市 路 
径 。 从 图 中 可 以 看 出 ,该 路 径 明 显 优 于 图 14-10 中 的 


路 径 , 且 每 个 城市 只 经 过 一 次 。 


随机 生成 种 群 中 城市 路 径 情 况 


慎 轴 


图 14-10 ”随机 生成 种 群 中 城市 路 径 情 况 


蝴 机 产生 的 种 辞 图 


0 
展 钳 
图 14-9 ”随机 产生 的 城市 种 群 图 


优化 后 的 种 群 中 城市 路 径 情 襄 


横 轴 
图 14-11 优化 后 的 城市 路 径 
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14.3.3 模糊 神经 网 络 控制 在 MATLAB 中 的 应 用 


美国 加 州 大 学 的 L. A. Zadeh 教授 在 1965 年 发 表 了 关于 模糊 集合 理论 的 著名 论文 。 
2 上 表达 事物 模糊 性 的 重要 概念 一 一 隶属 田 数 ,突破 19 世纪 末 康 托 尔 的 经 
典 集 合理 论 , 这 些 黄 定 了 模糊 理论 的 基础 。 

和 神经 网 络 技术 是 近年 来 人 工 智 能 研究 较为 活 牙 的 两 个 领域 。 人 工 神 经 
网 络 是 模拟 人 脑 结 构 的 思维 功能 ,县 有 和 较 强 的 自学 习 和 联想 功能 ,人 工 干 预 少 ,糖度 较 

高 :对 专家 知识 的 利用 也 较 少 。 

模糊 神经 网 络 有 如 下 三 种 形式 : 逻辑 模糊 神经 网 络 .算术 模糊 神经 网 络 .混合 模糊 神 
经 网 络 。 

模糊 神经 网 络 就 是 具有 模糊 权 和 系数 或 者 输入 信号 是 模糊 量 的 神经 网 络 。 上 面 三 种 
形式 的 模糊 神经 网 络 中 所 执行 的 运算 方法 不 同 。 

模糊 神经 网 络 无 论 作 为 通 近 大 ,还 是 模式 存储 大 :都 是 雷 要 和 学习 和 优化 权 系 数 的 。 
尝 习 算法 是 模糊 神经 网 络 优 化 权 系 数 的 关键 。 

对 于 逻辑 模糊 神经 网 络 , 可 采用 基于 误差 的 学 习 算 法 , 即 监 视 学 习 算 法 。 对 于 算术 
模糊 神经 网 络 , 则 有 模糊 BP 算法 .遗传 算法 等 。 

对 于 混合 模糊 神经 网 络 , 目 前 尚未 有 合理 的 算法 。 不 过 ,混合 模糊 神经 网 络 一 般 是 
用 于 计算 而 不 是 用 于 学 习 的 ; 它 不 必 一 定 学 习 。 

一 种 基于 T 一 S 模型 的 模糊 神经 网 络 由 前 件 网 络 和 后 件 网 络 两 部 分 组 成 。 前 件 网 络 
用 来 匹配 模糊 规则 的 前 件 , 它 相当 于 每 条 规则 的 适用 度 。 后 件 网 络 用 来 实现 模糊 规则 的 
后 件 。 总 的 输出 为 各 模糊 规则 后 件 的 加 权 和 ,加 权 系 数 为 各 条 规则 的 适用 度 。 

模糊 神经 网 络 具 有 局 部 通 近 功能 ,上 且 具 有 神经 网 络 和 模糊 逻辑 两 者 的 优点 。 它 既 可 
以 容易 地 表示 模糊 和 定性 的 知识 ,又 具有 较 好 的 学 习 能 力 。 

水 质 评价 指 按照 评价 目标 ,选择 相应 的 水 质 参 数 、. 水 质 标 准 和 评价 方法 .对 水 体 的 质 
量 利 用 价值 及 水 的 处 理 要 求 做 出 评定 。 水 质 评 价 是 合理 开发 利用 和 保护 水 资源 的 一 项 
基本 工作 。 根 据 不 同 评价 类 型 ,采用 相应 的 水 质 标准 。 

评价 水 环境 质量 ,采用 地 面 水 环境 质量 标准 ; 评价 养殖 水 体 的 质量 ,采用 渔业 用 水 水 
质 标 准 ; 评价 集中 式 生 活 饮 用 水 取水 点 的 水 源 水 质 , 用 地 面 水 卫生 标准 ; 评价 农田 灌溉 
用 水 ,采用 农田 灌溉 水 质 标准 。 

- 般 部 以 国家 或 地 方 政府 颁布 的 各 类 水 质 标 准 作 为 评价 标准 。 在 无 规定 水 质 标 准 
情况 下 ,可 采用 水 质 基 准 或 本 水 系 的 水 质 背 景 值 作为 评价 标准 。 

现 末 取 江 水 样本 对 江水 水 质 进 行 评价 ;采取 的 取水 口 分 别 记 为 A、B 和 CJ 浅 。 二 个 
水 厂 水 中 的 氨 氧 含量 变化 趋势 如 图 14-12 一 图 14-14 万 不。 

从 图 14-12 一 图 14-14 可 以 看 出 ,CT 厂 水 中 的 氨 氧 含量 低 于 信和 BJ 浅 的 。 

【 例 14-s] 应 用 模糊 神经 网 络 算法 ,实现 江水 水 质 的 评价 。 

根据 训练 输入 /输出 数据 维 数 确定 网 络 结构 ,初始 化 模糊 神经 网 络 隶属 于 果 数 参数 
和 系数 , 归 一 化 训练 数据 。 


六 演 十 言 忆 > 帝国 举 


图 14-14 C 厂 水 中 的 氨 氧 含量 变化 趋势 


从 数据 库 文 件 datal 中 导出 数据 。 其 中 ,因为 江水 水 质 评 价 的 真实 数据 比较 难 找 , 文 
中 随机 给 出 5 类 数据 作为 江水 水 质 评价 的 5 种 因 
MATLAB 程序 如 下 : 


C1 

Clear 

当 套 数 初 始 化 
XxXite= 0.002; 


网 络 节点 

Ln $$ 输 入 节点 数 
Ha $ 隐 含 节点 数 
ee 名 输出 节点 数 


和 系数 初始 化 

pO=0.3xones(M,1);p0 1=p0;p0 2=p0 1; 
pl=0.3*x ones(M,1);pl 1 =pl;pl 2=pl 1; 
p2=0.3x ones(M,1);p2 1 = p2;p2 2=p2 1; 
p3=0.3x ones(M,1);p3 1 = p3;p3 2=p3 1; 
pA4=0.3xones(M,1);p4 1=p4;p4 2=p4 1; 
p5=0.3x*xones(M,1);p5 1 =p5;p5 2=p5 1:; 
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pe6=0.3x ones(M,1);pe 1 = pe;pe 2=p6 1:; 


多 参数 初始 化 
c=1++rands(M,I);c 1 =c;c 2=ce 1.; 
B11rans(u I BI bh? bl 


maxgen = 120; 秆 进化 次 数 


当 网络 测试 数据 ,并 对 数据 归 一 化 
load datal Input train output train input 七 est output test 


和 当选 取样 本 输入 /输出 数据 归 一 化 
[ inputn, inputps ] = mapminmax( Input train).; 
[outputn, outputps| = mapminmax(output train); 


[n,m| = size(input train).; 


秆 秆 第 第 第 第 第 网 络 训 练 秆 秆 秆 第 第 第 第 第 秆 秆 名 
多 循环 开始 ,进化 网 络 
for 111 = 1 :maxgen 
了 了] 
fork=1:m 
X= inputn(:,k); 


名 输出 层 结 算 
for i1=1:I 
for j=1:M 
u(i,j) = exp( — (x(i) — c(j,1))*2/b(j, 1)); 
end 
enid 
当 模糊 规则 计算 
for 1=1:M 
w(1i) = ul,1i) x u(2,1) x u(3,1) x u(4,1) x u(5,1) * u(6,1).; 
end 
addw = sum( w) ， 
for 1=1:M 
yi(i)=p0 1(i)+pl 1(i)* x(1)}+p2 1(i) x x(2)+p3 1(i)*x* x(3) +p4 1(i) * x(4) 
十 BE5 1(1i) x x(S5)+ pe 1(1) * x(6)}).; 
end 
addyw = Yl XX W'; 
当 网 络 预测 计算 
yn(k) = addyw/addw; 
e(k) = outputn(k) — yn(k).; 
和 计算 Pp 的 变化 值 
d p= zeros(M,1).; 
d p= xitex* e(k) # w. /addw; 
d p=dp'; 


多 计 算 b 变化 值 
db=0xb 1; 


for i1=1:M 
for J=1:I 


d b(i,j) = xitex e(k) x (yi(i) xaddw — addyw) x (x(j)— c(i,j))*2x*w(i)/(b 


(1i,j)“2*% addw “2); 
end 
end 
先 更 新 上 变化 值 
for i1=1:M 
for ] 三 工 : 工 


d c(i,j) = xitex e(k) x (vi(i) x addw — addyw) x 2 ¥* (x(j) — c(i,j)) x w(i)/ 


(b(i,j) * addw “2); 
end 

end 
PO=p0 1+ dd pt+alfax (pO 1 pO 2); 
pl=pl 1+ d px x(1)+alfax (pl 1 一 pl 2); 
p2=p2 1+ d px x(2) +alfax (p2 1— p2 2); 
p3=p3 1+ d pxx(3) +alfax (p3 1 一 p3 2); 
p4=p4 1+ d px x(4) +alfa* (p4 1— p4 2); 
p5=p5 1+ d px x(5) +alfax (pS5 1 一 p5 2); 
p86=p6 1+ d px x(6) +talfax (p6 1— p6 2); 
b=b 1+d bi+alfax (b 1—-b 2); 
eo oide Taliaxlo 1 0 2]; 
PO 2=5p0 1;PU_ 1= po; 
pl 2=pl lpl 1= pl; 
D2 ZB De 1= pa; 
p3 2=p3 1;p3 1 = p33; 
p4 2=p4 1;p4 1= p4; 
p33 2= pS 1;pS 1 = ps; 
pe 2=p6 lj;pe 1 = pe; 
= 
b2=b1l;b 1=b; 


end 
E(iii) = sum(abs(e)); 


end 


figure(1); 

plot(outputn, 'r') 

hold on 

plot(yn, 'b') 

hold on 

plot(outputn 一 vn, 'g'); 

legend(' 实 际 输出 ', ' 预 测 输 出 ', ' 误 差 ','fontsize',12) 
title(' 训 练 数 据 预 测 ', 'fontsize',12) 

xlabel(' 样 本 序号 ','fontsize',12) 

Vlabel(' 水 质 等 级 ','fontsize',12) 


第 和 害 秆 第 秆 守 害 第 第 竺 和 牢 网 络 预 测 竺 第 第 第 第 第 第 秆 秆 逢 第 第 秆 守 和 秆 第 第 第 


多 数据 归 一 化 处 理 


0 VM ee A pe ge 
[i 
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inputn test = mapminmax( 'apply', input test, inputps); 
[n,m| = sizel inputn test) 
fork=1:m 
X= inputn test( :,k); 
和 计算 输出 中 间 层 
for i=1:I 
正四 ER = 1:MM 
站 
end 
enid 
for i=1:M 
wi} =u(l,1) x u(2,1) x u(3,1) x u(d,1) x u(5,1)} x u(6,1)-; 
end 
addw = 0; 
for i1=1:M 
addw = addw + w(1i); 
end 
for i=1:M 
yi(i}=p0 1(1}+pl 1(1) x(1)+p2 1(1)} x x(2) + p3 1(1i)} ¥ x(3) +p4d 1(1i) x% x(4) 
+165 1(13) x(S) TD6 li (0); 
end 


addyw = 0; 
for i1=1:M 

addyw = addyw + yi(i) x w(i); 
end 


和 计算 输出 
yec(k) = addyw/addw; 
end 


第 第 秆 第 第 第 秆 秆 第 多 预测 结果 反 归 一 化 秆 秆 千 秆 第 第 秆 秆 秆 第 第 第 第 秆 知人 第 秆 秆 秆 秆 御 第 
test simu= mapminmax( 'reverse', yc, outputps ); 

名作 图 

figure(2) 

plot(output test, 'r') 

hold on 

plot(test simu, 'b') 

hold on 

plot(test simu— output test,'g') 

legend(' 实 际 输出 ',' 预 测 输 出 ', ' 误 差 ','fontsize',12) 
title(l 测试 数据 预测 ' 'fontsize',12) 

xlabel(' 样 本 序号 ', 'fontsize',12) 

vlabel(' 水 质 等 级 ', 'fontsize',12) 


第 入 入 调和 人 竺 竺 竺 竺 先 竺 竺 竺 江 水 实际 水 质 预 测 竺 第 秆 竺 市 竺 和 第 千 竺 竺 竺 和 人生 竺 竺 竺 再 竺 村 
load data2 C BR 
秆 人 千 千 知人 千 秆 知人 千 秆 知 千 和 害 知 先知 知人 千 忆 厂 千 人 先 千 知人 先知 人 千 千 害 知 先知 千 先 守 


ZSSZ= C; 


章 

和 数据 归 一 化 

inputn test = mapminmax( 'apply', zssz, Inputpsy) ; 

[n,m| = size(zssz).; Wal 

Eor k= 1:1:w 能 
XxX= inputn test!(:, k); 只 


秆 计 算 输 出 中 间 层 
for i1=1:I 
for J=1:M 
ul( 1 j) = exp\ (x( 1) 3 hl i))*2/b(j,1) 
end 


end 


for i1=1:M 
wi} =u(l,1) x u(2,1) x (3,1) x u(d, i) u(5, i} x u(6,1).; 
end 
addw = 0; 
for i=1:M 
addw = addw + w(1); 
end 
for i1=1:M 
Yi(i)}= pO 1(i) +pl 1(i) x* x(1) +p2 1(i) x x(2)+p3 1(i} * x(3) 十 Pd 1(1i) x x(4)+ 
p5 1(i) x x(5)+ pe 1(i) x x(6).; 
end 
addyw = 0; 
for i=1:M 
addvyw = addyw + yi(i) x w(i); 
end 
当 计算 输出 
szzbfk) = addyw/addw:; 
end 


szzbzl] = mapminmax( 'reverse', szzb, outputps); 


for1i=1:m 
if szzbzl (i)<=1.5 
szpjl(i)}=1.; 
elseif szzbzl(1i)> 1.5&&kszzbzl(i)<= 2.5 
szpjl(1) = 2.; 
elseif szzbzl(1i1)> 2.5&&szzbzl(i)<= 3.5 
szpjl(i) = 3; 
elseif szzbzl(i)})> 3.5g&szzbzl(i)<= 4.5 
szpjl(1i1) = 4; 
企业 写 佐 
szpjl(i)= 5; 
end 
enid 
第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 第 B 厂 秆 第 第 第 第 第 第 第 第 第 第 第 第 第 第 秆 第 第 第 第 第 
zsSsz= B; 


inputn test = mapminmax( 'apply', zssz, Inputpsy) ， 


FI 目 


MATLAB 科 学 计算 


[n,m| = size(l(zssz).; 
fork=1:1:m 
x= inputn test!(:,k).; 


各 计算 输出 中 间 层 
for i=1:I 
Tor = 1:M 
ul a I 2 
end 
end 
Lor 1— 1:M 
w(i) =u(l,i) x u(2,1})} x u(3,1}) x u(d,1) x u(5,1) x u(6,1).; 
end 
addw = 0.， 
for i=1:M 
addw = addw + w( 1); 
end 
ior 1=1:M 
vi(i)= pO 1(2)}+pl (i) ¥ x(1) +p2 1(1) x x(2)+p3 1(1) * x(3)+p4 1(1) x x(d)+ 
p5 1(i)x* x(5) +p6 1(i)*% x(6).; 
end 
addyw = 0， 
for 1=1:M 
addyw = addyw + yi(1i) x w(1); 
end 
和 计算 输出 
szzb(k) = addyw/addw; 
end 
szzbz2 = mapminmaxl( 'reverse', szzb, outputps); 
for1i=1:m 
if szzbz2(1)<=1.5 
szpj2(1i1)=1.; 
elseif szzbz2(1)>1.5&&szzbz2(1i)<= 2.5 
szpj2(i) =2:; 
elseif szzbz2(1)> 2.5&&szzbz2(i1)<= 3.5 
szpj2(1) = 3; 
elseif szzbz2(1)> 3.5&&szzbz2(i)<= 4.5 
szpj2(1) = 4; 
芷 业 总 宕 
SZzZp]2(I) =5:; 
end 
end 
第 害 害 害 害 害 害 秆 第 秆 害 害 秆 秆 害 秆 第 害 A 厂 和 第 秆 害 害 害 害 害 逢 第 害 害 秆 害 和 害 秆 和 害 慎 
zsSSsSz—= A; 
inputn test = mapminmax( 'apply', zssz, Inputpsy) ; 


[n,m| = size(zssz); 


IorEk=1:1:m 
X= inputn test(:,k).; 


渤 回 苦 < 二 吉 扯 这 深 
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\ 运行 上 述 程序 ,得 到 训练 数据 预测 结果 如 图 14-15 所 示 , 测 试 数据 预测 如 图 14-16 


训练 数据 预测 


测试 数据 预测 


--- 实 际 输出 
| 一 预测 输出 
-一 误差 

SB 0.5 ey 
证 圳 
Es 里 
关 9 < 

-0.5 

"0 50 100 150 200 250 300 350 “0 10 20 30 40 

样本 序号 


样本 序号 
图 14-16 ”测试 数据 预测 

得 到 模糊 神经 网 络 对 A、B 和 C 厂 的 水 质 评 价 如 图 14-17 所 示 。 其 中 ,图 14-17 中 材 
坐标 0 一 25 表示 从 开始 计算 水 质 的 月 份 到 之 后 的 第 25 个 计算 的 水 质 月 份 。 


4.5 


图 14-15 ”训练 数据 预测 结果 


预测 水 质 


时 间 


图 14-17 ”模糊 神经 网 络 对 A.B 和 C 厂 的 水 质 评 价 

从 图 14-17 中 可 以 看 出 ,C 厂 水 质 要 好 于 BB 和 A 厂 水 质 , 这 与 前 面 有 关 氨 氧 含 量 世 
结果 相符 ,这 说 明了 模糊 神经 网 络 了 预测 结果 的 有 效 性 ，。 
14.3.4 蚁 群 算 法 的 MATLAB 实现 

蚁 群 算 法 由 Dorigo 于 1992 年 在 他 的 博士 论文 中 提出 ,其 灵感 来 源 于 蚂蚁 在 寻找 食 
物 过 程 中 发 现 路 径 的 行为 。 

1. 基本 原理 

慌 群 优化 算法 是 模拟 晤 明艳 食 的 原理 设计 出 的 一 种 群集 壤 能 算法 。 紧 蚊 在 砚 食 过 


程 中 能 够 在 其 经 过 的 路 径 上 留 下 一 种 称 为 信息 又 的 物质 ,在 疯 食 过 程 中 能 够 感知 这 种 物 
质 的 强度 ,并 指 寻 目 己 行动 方 辐 ,它们 总 是 参看 该 物质 强度 高 的 方 癌 移动 :因此 大 量 蚂 尼 


组 成 的 集体 殉 食 就 表现 为 一 种 对 信息 素 的 正 反 馈 现 象 。 


10cm 
遗留 的 也 就 越 多 ,信息 素 的 浓度 也 就 越 高 ,蚂蚁 选择 这 条 本 PP 四 
食物 


路 径 的 几率 也 就 越 高 ,由 此 构成 正 反馈 过 程 ,从 而 逐渐 地 ” 洁 祥 / 站 
RE hd > 
逼近 最 优 路 径 , 找 到 最 优 路 径 。 

蚂蚁 竟 食 的 运行 轨迹 模式 如 图 14-18 所 示 。 蚂 蚁 以 
信息 素 作为 媒介 而 间接 进行 信息 交流 ,判断 洞穴 到 食物 
地 点 的 最 佳 路 径 。 

当 蚂蚁 从 食物 源 走 到 蚁 穴 , 或 者 从 蚁 穴 走 到 食物 源 时 ,都 会 在 经 过 的 路 径 上 释放 信 
息 素 ,从 而 形成 了 一 条 含有 信息 素 的 路 径 , 蚂 蚊 可 以 感觉 出 路 径 上 信息 素 浓度 的 大 小 ,并 
且 以 较 高 的 概率 选择 信息 素 浓度 较 高 的 路 径 。 

人 工 蚂 蚁 的 搜索 主要 包括 三 种 智能 行为 : 

(1) 蚂 蚊 利用 信息 素 进 行 相互 通信 。 蚂 蚁 在 所 选择 的 路 径 上 会 释放 一 种 信息 素 的 物 
质 , 当 其 他 蚂 蚊 进行 路 径 选择 时 .会 根据 路 径 上 的 信息 素 浓度 进行 选择 ,这 样 信息 素 就 成 
为 蚂蚁 之 间 进 行 通信 的 媒介 。 

(2) 蚂蚁 的 记忆 行为 。 一 只 蚂蚁 搜索 过 的 路 径 在 下 次 搜索 时 就 不 再 被 该 蚂蚁 选择 ， 
因此 在 蚊 群 算法 中 建立 禁忌 表 进 行 模拟 。 

(3) 蚂 蚊 的 集群 活动 。 通 过 一 只 蚂蚁 的 运动 很 难 达到 事物 源 , 但 整个 蚊 群 进行 搜索 
就 完全 不 同 。 当 某 些 路 径 上 通过 的 蚂蚁 越 来 越 多 时 ,路 径 上 留 下 的 信息 素数 量 也 就 越 
多 ,导致 信息 素 强 度 增 大 ,蚂蚁 选择 该 路 径 的 概率 随 之 增加 ,从 而 进一步 增加 该 路 径 的 信 
息 素 强度 ,而 通过 的 蚂 蚊 比较 少 的 路 径 上 的 信息 素 会 随 着 时 间 的 推移 而 挥发 ,从 而 变 得 
越 来 越 少 。 


图 14-18 ”蚂蚁 运行 轨迹 模式 


2. 程序 设计 


蚁 群 算法 CACO) 不 仅 利 用 了 正 反 馈 原 理 , 在 一 定 程 度 上 可 以 加 快 进 化 过 程 , 而 且 是 
一 种 本 质 并 行 的 算法 ,个 体 之 间 不 断 进行 信息 交流 和 传递 ,有 利于 发 现 较 好 解 。 
根据 蚁 群 算法 的 介绍 ,编写 蚁 群 拭 法 MATLAB 源 程 订 如 下 : 


clear all 


cle 

先 先 和 初 各 化 告 告 秆 第 人 秆 第 第 第 第 第 第 秆 千 第 千 千 第 千 先 千 告知 人物 千 知人 先 先 

Ant = 300; 币 晤 蚁 数量 

Times = 80; 秆 虹 虹 移动 次 数 
Rou= 0.9; 名 信息 素 挥 发 系数 
PO = 0.2; 名 转移 概率 常数 
Lower 1=—1; 村 设置 搜索 范围 


Upper 1=1; 
Lower 2=—1; 


Upper 2=1，; 
害 害 害 害 害 害 害 害 害 守 害 害 害 害 害 害 害 害 害 害 害 守 守 害 宅 害 针 
for i1=1:Ant 


人 
1 
往 
能 
算 
法 
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X(i,1) = (Lower 1+ (Upper 1— Lower 1) x rand); 秆 随机 设置 蚂蚁 的 初 值 位 置 
xX(1i,2) = (Lower 2+ (Upper 2 一 Lower 2) * rand); 
Tau(1i) = F(X(1,1),X(1,2)); 


Tid 


Step= 人 .0 
f= °°'— (x.^4+3xv.*4—0.2x cos(3x pix Xx) -0.4 cos(d4x pixvy)+0.6)'; 


[x, y|] = meshgrid( Lower 1:step:Upper 1,Lower 2:step:Upper 2); 
z= eval(f): 

figure(1); 

subplot(1,2,1 ); 

mesh(x, vy, z); 

hold on.; 

plot3(X(: ,1),X(:,2),Tau, ‘kx') 

hold on; 

text(0.1,0.8, 一 0.1,' 妈 蝶 的 初始 分 布 位 置 '); 

xlabel( 'x') ;ylabel('y') ;zlabel( 'f(x,y)'); 


for T=1:Times 
lamda = 1/T; 
[Tau Best(T),BestIndex| = max( Tau); 
for 1=1:Ant 
P(T,i) = (Tau(BestIndex) -Tau(i))/Tau(BestIndex); 多 计算 状态 转移 概率 
end 
for i=1 :Ant 
if P(T,i)<PO 旬 局 部 搜索 
templ = X(i,1)}+ (2x% rand— 1) x lamda; 
temp2 = X(1,2)++ (2x rand— 1) x lamda- 
else 争 全 局 搜索 
templ = X(i,1)+ (Upper 1 一 Lower 1)*x (rand— 0.5); 
temp2 = X(i,2) + (Upper 2 Lower 2) x (rand— 0.5); 


end 


当 越界 处 理 

if templ <Lower 工 
templ = Lower 1]; 

end 


1f templ > Upper 1 
templ = Upper 1; 
end 
if temp2 < Lower 2 
temp2z = Lower 2; 
md 
if temp2 > Upper 2 
七 empz = Upper 2; 
end 


和 什 入 对 


if F(templ,temp2)})> F(X(i,1),X(i,2)) 
x(i,1) = templ; 
xX(1i,2) = temp2; 
end 
end 
for i=1:Ant 
Tau(i)= (1 一 Rouhy * Tau(1i1)} + F(X(i,1),X(1i,2)):; 
end 
end 


subplot(1,2,2):; 

mesh(x, y, z); 

hold cn ; 

X= X(:,1)- 

a 

plot3(x, y, eval(£), 'k x '); 

hold on; 

text(0.1,0.8, 一 0.1,' 蚂 开 的 了 最终 分 布 位 置 '); 
xlabel( x') ;vlabel(''y') ;zlabel( f(x,yY)'):; 


[max value,max index] = max(Tau).; 
maxX = X(max index,1 ); 


maxY = X(max index,2); 


maxValue = F(X(max index,1),X(max index,2)); 


设 定 目标 盟 效 如 下 : 


function [F|] = 下 (XL，x2) 


F=— (xl.*4+3x x2.*4-0.2x cos(3%* pix x1})}-—- 0.4x% cos(d x pix x2)+0.6); 


运行 程序 得 到 蚂 收 算 法 运行 前 后 ,蚂蚁 的 位 置 变化 示意 图 如 图 14-19 所 示 。 
蚂蚁 的 初始 分 布 位 置 蚂蚁 的 最 终 分 布 位 置 


1 (人 yy) 
fx, ») 


和 当 判 断 蝠 蚁 是 否 移动 


第 更 新 信息 量 


图 14-19 蚂蚁 的 位 置 变化 示意 图 
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3. MATLAB 实现 


移动 机 器 人 路 径 规 划 是 机 器 人 学 的 一 个 重要 研究 领域 。 它 要 求 机 器 人 依据 某 个 或 
某 些 优化 原则 (如 最 小 能 量 消耗 .最短 行 走路 线 、 最 短 行走 时 间 等 ) ,在 其 工作 空间 中 找到 
一 条 从 起 始 状态 到 目标 状态 的 能 避 开 障碍 20 人 人 
物 的 最 优 路 径 。 人 

机 器 人 路 径 规 划 问 题 可 以 建 模 为 一 个 15 
有 约束 的 优化 问题 ,都 要 完成 路 径 规划 、 定 


a 
位 和 避 障 等 任务 。 
应 用 蚁 群 算法 求解 机 器 人 路 径 优化 间 。 
题 的 主要 步骤 如 下 : 
(1) 输入 由 0 和 1 组 成 的 矩阵 表示 机 0. 
器 人 需要 寻找 最 优 路 径 的 地 图 ,如 图 14-20 “ 下 四 加 
所 示 。 图 14-20 ”机 器 人 需要 寻找 最 优 路 径 的 地 图 


其 中 ,0 表示 此 处 是 可 以 通过 的 ,1 表示 
此 处 为 障碍 物 。 由 此 得 到 的 矩阵 如 下 : 
G 一 [00000011100000000000i 


0O01100011100000000000; 
0O01100011100000000000; 
OO000011100000000000; 


Oll1IOO0l1l1I1I1O0000000000; 
OlIlIOO0l1l1I11I1O0000000000; 
UL1L11I0011L1101111000000; 


L 

1 

L 
OO000011100000000000; 

1 

1 


UL1L11I0000001111000000; 
OO000000001111000000; 
OO0000001T111111000000; 
OO0000001T111111000000; 
O0000000000111011110; 
OO000000000111011110; 


111L1I0O0O0OU00011 110011110; 
111L10011111100000000; 
OO0000l111111IOO00O000l110; 
OO000000001T]1]IOO0000L110O; 
OO000000001T100100000; 
O0000000001100000000;|; 

(2) 输入 初始 的 信息 素 矩 阵 :选择 初始 点 和 终止 点 并 且 设 置 各 种 参数 。 在 此 次 计算 

中 ,设置 所 有 位 置 的 初始 信息 素 相 等 。 
(3) 选择 从 初始 点 下 一 步 可 以 到 达 的 节点 ,根据 每 个 节点 的 信息 素 求 出 前 往 每 个 节 


点 的 概率 ,并 利用 轮 盘 赌 算法 选取 下 一 步 的 初始 点 。 
攻 人 

[ry (0) 1 » Lys 0 : 

—, jE NO tabus} 

k | ry C(t) -Lys ]f 知 

其 他 法 


式 中 ,vj (四 为 析 取 图 中 弧 (i,7) 上 的 信息 又 的 浓度 ; w5 为 与 弧 (i,7) 相 关联 的 局 发 式 
信息 ; a、8 分 别 为 ry (zt) 、ws 的 权重 参数 。 
(4) 更 新 路 径 和 路 程 长 度 。 
(5) 重复 (3)、(4) ,直到 蚂蚁 到 达 终 点 或 者 无 路 可 走 。 
(6) 重复 (3) 一 (5) ,直到 革 一 代 只 蚂蚁 近代 结束 。 
(7) 更 新 信息 素 和 矩阵 ,其 中 没有 到 达 的 蚂蚁 不 计算 在 内 。 
rt 十 1 一 《1 一 DJ) xry(t) Ars 


[全 -， 蚂蚁 上 经 过 i,] 


Areetiy —= 1 
0， 蚂蚁 上 不 经 过 i ,7 
(8) 重复 (3) 一 (7), 直 至 第 nn 代 蚂 蚁 迭代 结束 。 
【 例 14-6】 根据 图 14-20 所 示 地 图 , 画 出 机 器 人 行走 的 最 短路 径 , 并 且 输 入 每 一 轮 选 
代 的 最 短路 径 ,查看 程序 的 收敛 效果 。 
根据 以 上 分 析 ,得 到 MATLAB 代码 如 下 : 


function madlnt ) 
G=[00000011100000000000; 


Dll1I0O00011100000000000:; 
Ooll00011100000000000:; 
Dooo0o0011100000000000:; 
O0000011i11li00000000000; 
OO1l110011100000000000:; 
Ooll1l10011100000000000:; 
OOlllO0OO1L1101111000000: 
Dll110000001 1 1 1000000:; 
O0000000001111000000; 
O0000001111111000000; 
O0000001i111i111i111li1000000; 
O0000000000111011110; 
O000000000011101i11110; 
1 1 10000000111I01111 0: 
1 1 1 1I0O001111 1 100O0000000: 
ooDooo0ool1l 1 111100000110:; 
O0000000001100000110; 
O00000000011001l100000; 
O0000000001100000000;]; 
MM = sizelG,1); 钙 G 地 形 图 为 01 矩阵 ,如 果 为 1 表示 障碍 物 
Tau = ones(MM x MM, MM x MM) ; 秆 Tau 初始 信息 素 矩 阵 


Tau = 8. *%* Tau; 


K= 100; 第 读 代 次 烙 ( 指 晤 虹 出 动 多 少 波 ) 
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M= 50; 
SS 三 1 : 
E= MM *x MM:; 
Alpha = 1; 
Beta= "7; 
Rho=0.3 ; 
Q=1; 
mink] = inf.; 
mink=0; 
minl] = 0:; 
D= G2D(G); 
N= size(D,1); 
a= 1; 
Ex=ax (mod(E,MM)— 0.5); 
if Ex==—0.5 
Ex= MM— 0.5; 
end 
Evy=ax (MM+0.5— ceil(E/MM) ); 
Eta = zeros(N): 
争 以 下 启发 式 信息 矩阵 
for 1=1:N 
ix=ax (mod(i,MM)— 0.5); 
IE ix==— 0.5 
ix = MM 一 0.5; 
end 
iy=ax (MM+0.5— ceil(i/MM) ); 


I 


委 蚂蚁 个 数 

名 最 短路 径 的 起 始点 

第 最 短路 径 的 目的 点 

委员 Lpha 为 表征 信息 素 重 要 程度 的 参数 

当 Beta 为 表征 启发 式 因 子 重要 程度 的 套数 
和 Rho 为 信息 素 蒸 发 系数 

和 QQ 为 信息 素 增 加 强度 系数 


秆 和 表示 问题 的 规模 (像素 个 数 ) 
第 小 方 格 像 素 的 边 长 
竺 终止 点 模 坐 标 


秆 终 止 点 纵 坐 村 
竺 启发 式 人 信息, 取 为 至 目标 点 的 直线 距离 的 倒数 


Eta(i) = 1/((ix— Ex)*2+ (iy— Ey)*2)^0.5; 


else 
Eta(i) = 100; 
end 
end 
ROUTES = cell(K,M):; 
PL = zeros(K, M):; 


fork=1:K 
form=1:M 
委 状态 初始 化 
W= Ss; 
Path = S; 
PLkm=0; 
TABUkEm = omes( N) : 
TABUlm( S) = 0; 
DD = D; 
和 下 一 步 可 以 前 往 的 节点 
DW= DD(W, : ); 
DW1 = find(DW); 
for j= 1:length(DW) 
IE TABUkm( DW1(j)) == 


和 当 用 细胞 结构 存储 每 一 代 的 每 一 只 蚂 琢 的 爬行 路 线 
和 用 算 阵 存储 每 一 代 的 每 一 只 蚂蚁 的 让 行 路 线 长 度 
和 启动 上 轮 蚂 蚁 葛 食 活动 ,每 轮 派出 MH 只 蚂蚁 


当当 前 节点 初始 化 为 起 始点 

当 爬行 路 线 初 始 化 

多 认 行路 线 长 度 初始 化 

委 禁 忌 表 初始 化 

种 已 经 在 初始 点 了 ,因此 要 排除 
当 邻接 算 阵 初始 化 


DW(DW1 (j)) =0; 


和 蚂蚁 未 遇 到 食物 或 者 陷入 死胡同 或 者 疯 食 停止 
while 而 一 一 ESALen LJD>=1 
当 轮 林 赌 法 选择 下 一 步 怎 么 走 
PP = zeros(Len LJD) ; 
for 1=1:Len LID 
PP(I) = (Tau(W, LID(i))^*Alpha) x ((Eta(LID(i)))“Beta): 
end 


end 
end 知 
LIJD = find(DW). 能 
Len LJD = length(LJD); 名 可 选 节 点 的 个 数 


sumpp = sum(PP) ; 
PP = PP/sumpp; 委 建 立 概 率 分 布 
Pecum( 1) = PP(1): 
for i1=2:Len LID 
Pecum(i) = Pcum(i— 1)+ PP(i); 
end 
Select = find{({Pcum> = rand); 
to visit = LIJD(Select(1)); 
和 状态 更 新 和 记录 


Path= [Path, to visit]; 秆 路径 增加 

PLkm = PLkm+ DD(W, to visit); 竺 路径 长 度 增 加 

W= to visit; 秆 昭 开 移 到 下 一 个 节点 
for kk=1:N 


if TABUkm(kk) == 
DD(W,kk) = 0; 
DD(kk,W) = 0; 
end 
end 
TABUkm(W) = 0; 当 已 访问 过 的 节点 从 禁忌 表 中 删除 
DW= DD(W, :); 
DW1 = find (DW):; 
for j= 1 :length(tDWL ) 
if TABUkm(DW1 (j)) == 


DW(j)= 0; 
end 
end 
LJD = find(DW); 
Len LTD = length(LID); 竺 可 选 节点 的 个 数 
end 


多 记 下 每 一 代 每 一 只 蚂蚁 的 疯 食 路 线 和 路 线 长 度 
ROUTES{k,m} = Path:; 
IE Path(end}) == 
PL(k,m) = PLkm; 
if PLkm < minkl 
mink = k;minl = m; minkl = PLkm; 
end 
else 
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PL(k,m) = 0; 

end 
end 
和 更 新 信息 素 
Delta Tau = zeros(N,N).; 

form=1:M 

if PL(k,m) 
ROUT = ROUTES{k,m}:; 


TS = length(ROUT) — 1; 


PL km= PL(k,m); 
for Ss=1:1s 
x= ROUT(s) : 
y= ROUT(s+ 1); 


负重 新 量 初 始 化 


币 束 数 


Delta Tau(x,y) = Delta Tau(x,y) + Q/PL km; 
Delta Tau(y, x) = Delta Tau(Yy,x) + Q/PL km; 


end 
end 
end 


Tau= (1 ~ Rho). * Taut+ Delta Tau; 


end 
和 绘图 
plotif =1; 
I DIoEIE 
minPL= zeros(K).; 
for i1=1:K 
PLK = PL(i, :); 
Nonzero = find(PLK).; 
PLKPLK = PLK( Nonzero):; 
minPL(1i) = min(PLKPLK).:; 
end 
figure(1) 
plot(minPL); 
hold on 
grid on 
title(' 收 合 曲 线 变 化 趋势 '); 
xlabel(' 沈 代 次 数 '); 
ylabel(' 最 小 路 径 长 度 '); 
figure(2) 
axis([0,MM,0,MM]) 
for 1=1:MM 
for J]=1:MM 
iF (lr = 
xl=j—1l1;yl=MM- 1; 
x2=j;y2= MM -i; 
x MM L111; 
x4=j—-lvy4=MM—i+1; 


% 信息 素 挥发 一 部 分 ,新 增加 一 部 分 


笛 绘 爬行 图 


fill([ x1, x2, x3,x4],[yl,y2,y3,Y4],[0.2,0.2,0.2]); 


hold on 


[= 


深 国 党 < 二 京 担 这 兴 
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end 

end 

fork=1:K 

PLK = PL(k, : ); 
minPLK = min( PLK).; 


pos = find(PLK == minPLK).; 


m= pos(1):; 
ROUT = ROUTES{k,m}:; 


LENROUT = length(ROUT). 


Rx = ROUT.; 
Ry = ROUT. 
for 11 = 1:LENROUT 


Rx(ii) =ax (mod(ROUT(ii),MM) — 0.5): 


if Rx(ii) ==— 0.5 
Rx(ii)=MM—-0.5.; 


end 


Ry(ii) =ax (MM+0.5— ceil(ROUT(ii)/MM)); 


end 
plot(Rx, Ry) 
hold on 
enid 
end 
function D = G2D(G) 
1] = size(G, 1 ).; 
D = zeros(1]* 1,1]* 1); 
for 1i=1:l 
for J=1:1 


it G(1,j) ==0 
fornm=1:1 

for n=:1 
if G(m,n) == 


end 
end 
enid 
enid 


end 


end 


im= abs(1i— m);jn= abs(j— n); 
if im+ jn==1||(im== 1l&&jn==1) 
D((1—1)x1+j,(m— 1)})x1+i+n) = (inm+ jn})*0.5; 


end 


运行 以 上 代码 ,得 到 收敛 曲线 (最 小 路 径 ) 变 化 趋势 如 图 14-21 所 示 。 从 图 14-21 中 


可 以 看 出 ,在 大 约 迭 代 40 代 时 ,最 小 路 径 长 度 基本 稳定 在 38 左右 。 
机 大 人 运行 轨迹 如 图 14-22 所 示 。 从 图 14-22 中 可 以 看 出 ,机 侣 人 在 到 达 目 标点 站 
整个 过 程 中 ,成 功 地 避 过 了 所 有 障碍 物 。 
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机 器 人 运动 轨迹 
收 敏 曲线 变化 趋势 
| 's 
' 1 1 ] 
二 $1 
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达 代 次 数 坐标 * 
图 14-21 收敛 遇 线 变化 趋势 图 14-22 机 器 人 运行 轨迹 


本 章 小 结 


本 草 重 点 介绍 人工 和 镶 能 的 相关 内 容 , 包 括 其 基本 概念 、 典 型 应 用 ,还 着重 介绍 了 粒 
于 群 算法 、 遗 传 算 法 、 模 糊 神 经 网 络 和 蚁 群 算法 等 几 种 第 见 的 经 典 智能 算法 ,并 利用 
MATLAB 代码 实现 其 算法 过 程 。 最 后 ,通过 应 用 举例 许 细 讲解 了 这 几 种 智能 算法 在 
MATLAB 中 的 应 用 。 
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发 闻 几 六 限 普 沫 册 四 法 


模糊 多 和 辑 指 模 仿 人 脑 的 不 确定 性 概念 判断 、 推 理 思维 方式 ,对 于 
模型 未 知 或 不 能 确定 的 描述 系统 ,以 及 强 非 线性 大洲 后 的 控制 对 象 ， 
应 用 模糊 集合 和 模糊 规则 进行 推理 ,表达 过 渡 性 界限 或 定性 知识 经 
验 , 模 拟人 脑 方 式 ,实行 模 糊 综合 判断 ,推理 解决 弟 规 方法 难于 对 付 的 
规则 型 模糊 信息 问题 。 模 糊 罗 和 辑 善 于 表达 界限 不 清晰 的 定性 知识 与 
经 验 :, 它 借助 于 隶属 度 图 数 概 念 , 区 分 模糊 集合 ,处 理 模 糊 关 系 , 模 拟 
人 脑 实施 规则 型 推理 ,解决 因 ”" 排 中 律 "的 多 辑 破 缺 产 生 的 种 种 不 确定 
问题 。 

学 习 目 标 : 

。 学 习 模 糊 多 和 加 基本 原理 及 方法 : 

。 学 习 横 类 逻辑 隶属 度 果 数 的 创建 : 

。 约 练 笠 握 利用 MATLAB 进行 梗 糊 逻辑 仿真 。 


1S.1 隶属 度 函 数 
MATLAB 模糊 工具 箱包 括 大 量 的 隶属 度 困 数 , 具 体 如 下 。 
15.1.1 高 斯 隶属 度 函 数 


MATLAB 中 高 斯 隶属 度 函 数 为 gaussmf() ,其 格式 如 下 : 
y= gaussmf(x,[sig c|) 


高 斯 隶属 度 图 数 的 数学 表达 式 为 


《ze 


f(r; oe) 一 a 
式 中 ,oc 为 参数 ; + 为 自 变 量 ; sig 为 数学 表达 式 中 的 参数 v。 
【 例 15-13 创建 高 斯 隶属 度 昂 数 曲 线 。 编 程 如 下 : 


clc,clear, Close all 

二 人 :0.1:10; 

Y= gaussmf(x,[2 5]); 
plot(x, vy) 

xlabel('gaussmf, P= [2 5]1') 


mi 


行程 序 . 输 出 图 形 如 图 15-1 所 示 。 


, 0 ] 此 3 | 3 6 7 8 9 10 


gaussmf, P=[2 5] 


图 15-1 高 斯 隶属 度 郴 数 昌 线 


15.1.2 两 边 型 高 斯 隶属 度 函 数 


MATLAB 中 两 边 型 高 期 隶属 度 旧 数 为 gauss2mf() ,其 格式 如 下 : 
Vy = gauss2mf(x,|[sigl cl sig2 c2 |] ) 


其 中 ,sigl、cl、sig2、c2 为 数学 表达 式 中 的 两 对 参数 ，。 
【 例 15-2】 创建 两 边 型 高 斯 隶属 度 图 数 曲 线 。 编 程 如 下 : 


clc,clear,close all 

x = {0:0.1:10})"; 

YL = gauss2mf(x, [241 8]); 
Y2 = gauss2mf(x, [2517]):; 
Y3 = gauss2mf(x, [2616]); 
Yd = gauss2mf(x, [2715|]):; 
Y5 = gauss2mf(x, [281 4]); 
plot(x, [vi Y2 v3 v4 y51); 
set(gcf, 'name', 'gauss2mf', 'numbertitle', '‘'off'); 
grid on 

axis tight 


运行 程序 ,输出 图 形 如 图 15-2 所 示 。 
15.1.3 一 般 和 名 型 隶属 度 孙 数 


MATLAB 中 钟 型 隶属 大 了 咯 


数 为 gbellmf() ,其 格式 如 下 : 
y = gbellmf (x,params) 


一 般 钟 型 隶属 度 图 数 依 靠 果 数 表达 式 为 
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15.1.4 两 个 sigmoid 型 隶属 度 困 数 之 差 组 成 的 隶属 度 困 数 
还 

Ci 

MATLAB 中 sigmoid 型 隶属 度 函 数 之 差 的 隶属 度 函 数 为 dsigmf0 〇 ,其 格式 如 下 ， TE 

y = dsigmf(x,[al cl a2 c21]) 本 


sigmoid 型 隶属 度 困 数 表 达 陈 为 
1 
f(rs CC 1 十 ec 
去 中 ,是 变量 ; ayc 是 参数 。 dsigmt 使 用 四 个 参数 al,ci, azs, cs， 并 且 是 两 个 
sigmoid 型 图 数 之 差 , 即 广 (Czi ae) 一 Cri azycz) ,参数 按 有 顺序 Laicaazcz] 列 出 。 
【 例 1s-4 创建 由 两 个 sigmoid 型 隶属 度 果 数 之 差 组 成 的 隶属 度 果 数 曲线 。 编 程 
如 下 : 


clc,clear,close all 
X=0:0.1:10;: 

y= dsigmf(x, [5 2 5 7]); 
plot(x, y) 

grid on 

axis tight 


运行 程序 ,输出 图 形 如 图 15-4 所 示 。 


图 15-4 两 sigmoid 型 隶属 度 函 数 之 差 组 成 的 隶属 度 陋 数 曲线 


15.1.5 通用 隶属 度 困 数 


MATLAB 中 通用 隶属 度 图 数 为 evalmf() ,其 格式 如 下 : 
y = evalmf(x, mfParams, mfType) 


evalmf 可 以 计算 任意 隶属 度 限 数 , 这 里 z+ 是 变量 定义 域 ,mfType 是 工具 箱 提 供 的 一 


- MATLAB 科 学 计算 
种 隶属 度 函 数 ,mfParams 是 此 隶属 度 函 数 的 相应 参数 。 如 果 想 创建 自 定义 的 素 


数 ,evalmf 仍 可 以 工作 ,因为 它 可 以 计算 它 不 徊 道 名 字 的 任意 隶属 度 羡 数 。 
【 例 15-5】 创建 通用 隶属 度 卫 数 曲线 。 编 程 如 下 : 


clc,clear, close all 
X=0:0.1:10-。- 

mfparams = [2 46]; 

mftype = ‘gbellmf'; 

Y = evalmf(x, mfparams, mftype); 
plot(x, y) 

xlabel('evalmf, P= [2 46]') 
grid on 

axis tight 


运行 程序 ,输出 图 形 如 图 15-5 所 示 。 


evalmf, P=[2 4 6] 


图 15-5 通用 隶属 度 函 数 遇 线 


15.1.6 型 妹 屋 度 胃 数 


: MATLAB 中 工 型 隶属 度 函 数 为 bimf() ,其 格式 如 下 : 
vy = pimf(x,[abcd|) 


品 量 x 指定 呐 数 日 空 量 的 定义 域 ,该 曙 数 在 同 量 x 的 指定 上 护 处 进行 计算 ,参数 | a.,b， 
cod 决定 了 图 数 的 形状 ,a 和 4d 分 别 对 应 曲线 下 部 的 左右 两 个 拐点 .5 和 cc 分 别 对 应 曲线 
上 部 的 左右 两 个 拐点 。 
| 【 例 15-6〗】 创建 形 隶 属 度 函数 曲线 。 编 程 如 下 : 


clc,clear,close all 
X=0:0.1:10- 
Y= pimf(x,[1 45 10|]); 


plot(x,y) 

xlabel('pimf, P= [145 10]') 
grid on 

axis tight 


运行 程序 ,输出 图 形 如 图 15-6 所 示 。 


- 六 并 忆 次 册 划 法 匣 园 尝 


pimf, P=[1 4 3 10] 


图 15-6 柑 形 隶属 度 函 数 曲 线 


15.1.7 ”两 个 sigmoid 型 隶属 度 函 数 乘积 组 成 的 隶属 度 函 数 


MATLAB 中 sigmoid 型 隶属 度 函 数 乘积 组 成 的 隶属 度 晴 数 为 psigmf(), 其 格式 
如 下 : 


y = psigmf(x,[al cl a2 c2]) 
sigmoid 型 隶属 度 函 数 表达 式 为 


式 中 ,zx 是 变量 ; ac 是 参数 。psigmf 使 用 四 个 参数 ai,cl,vaz:cz, 并且 是 两 个 
sigmoid 型 图 数 之 积 , 即 广 (Czri aiyci)x fz(X; az scz) ,参数 按 顺 友 [Laiciazczsj 列 出 。 

【 例 15-7】 创建 由 两 个 sigmoid 型 隶属 度 函 数 乘积 构成 的 隶属 度 函 数 曲 线 。 编 程 
如 下 : 


clc,clear,close all 
X=0:0.1:10-。 

了 = psignf(x,[23 -58]); 
plot(x, y) 

xlabel('psigmf, P=[23 58]') 
grid on 

axis tight 


《了 


加 国 
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运行 程序 ,输出 图 形 如 图 15-7 所 示 。 


psigmif. P=[2 3 —5 8] 


图 15-7 两 sigmoid 型 隶属 度 函 数 乘 积 组 成 的 隶属 度 明 数 曲 线 


: 15.1.8 siemoid 型 隶属 度 呐 数 


MATLAB 中 sigmoid 型 隶属 度 上 因数 为 sigmf() ,其 格式 如 下 : 
Y = sigmf(x,[a cc]) 
sigmoid 型 隶属 度 图 数 表 达 陈 为 

TE 1 
: xs ot *C) ] 十 一 az 
定义 域 由 同 量 x 给 出 ,形状 由 参数 a 和 cc 确定 。 
【 例 15-8】 创建 sigmoid 型 隶属 度 困 数 曲 线 。 编 程 如 下 : 


clc,clear,close all 
X00.1:10- 
y= sigmf(x, [2 4]); 
| plot(x,y) 
xlabel('sigmf, P= [2 4]') 
grid on 
axis tight 


运行 程序 ,输出 图 形 如 图 15-8 所 示 。 
创建 不 同 sigmoid 型 隶属 度 陋 数 曲 线 ,编程 如 下 : 


| clc,clear,close all 

XxX 二 (0:0.2:10)°'; 

yl = sigmf(x,[ -1 5]); 
sigmf(x,[— 3 5]); 
sigmf(x,[4 5]); 
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1s.1.9 S 形 隶 属 度 困 数 


MATLAB 中 S 形 隶 属 度 函 数 为 smf0) ,其 格式 如 下 : 
Y = Smt(x [ablj]) 


其 中 ,zz 为 变量 ,a 和 2 为 参数 ,用 于 定位 曲线 的 射 起 部 分 。 
【 例 15-9】 创建 S 形 隶属 度 当 数 曲 线 。 编 程 如 下 : 


Clec,clear, Close all 
X=:0.1:10;- 

y= smf(lx,[1 8]1); 
plot(x,y) 

grid on 

axis tight 


运行 程序 ,输出 图 形 如 图 15-10 所 示 。 


图 15-10 ”SS 形 隶属 度 孙 数 曲 线 
创建 不 同 S 形 隶属 度 限 数 曲 线 , 编 程 如 下 : 


clc,clear,close all 

TX 三 O00.1:10-: 

subplot(3,1,1):; 

plot(x, smf (x, [2 81),'linewidth',2); 
grid on 

subplot(3,1,2); 

plot(x, smf (x, [4 6]),'linewidth',2):; 
grid on 

subplot(3,1,3); 

plot(x, smf (x, [6 4]),'linewidth',2):; 
grid on 

axlis tight 


运行 程序 ,输出 图 形 如 图 15-11 所 示 。 
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15.1.10 梯形 隶属 度 函 数 


MATLAB 中 棉 形 隶属 度 图 数 为 trapmf() ,其 格式 如 下 : 
vy = trapmf(x,[abcdl|) 


‘0， 二 之 .在 
ee ee 

三 ziasreoscyd) 一 4141， 下 < 二 Ce， 
5 一 三 ， Cc 二 Td 
【0 ， 忆捷 工 


flrsasbcsd) = max (min (2—4,1,9—z) :0 ) 
定义 域 由 向 量 x 确定 ,曲线 形状 由 参数 a,b5,c,d 确定 ,参数 a 和 对 应 梯形 下 部 的 
左右 两 个 抛 点 :参数 2 和 fc 对 应 构 形 上 部 的 左右 两 个 抛 上 后 。 
【 例 15-10】 创建 梯形 隶属 度 蚂 数 曲 线 。 编 程 如 下 : 


clc,clear,close all 
X=0:0.1:10;: 

了 = 士 zapmttxz [15 了 81); 
plot(x, vy, 'linewidth',2) 
xlabel{l'trapmf, PE=[1578]') 
grid on 

axis tight 
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15.1.11 三 角形 隶属 度 男 数 


MATLAB 中 三 角形 隶属 度 上 因数 为 trimft() ,其 格式 如 下 : 


y = trimf(x,params) 


y = trimf(x,[abcl|) 


0， 天 < 人 

RE， 全 
f(r; Cecy 一 

一 二， 去 z 去 . 
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LO0， 攻 


或 者 


TC—a 全 


bp—a’c—bl 0) 
定义 域 由 向 量 x 确定 ,曲线 形状 由 参数 4.56,c 确定 ,参数 a 和 < 对 应 三 角形 下 部 的 左 
右 两 个 项 点 .参数 5 对 应 三 角形 上 部 的 项 点 ,这 里 要 求 a 三 5 三 c。 生 成 的 妹 属 度 隐 数 总 有 一 
个 统一 的 高 度 , 硅 想 有 一 个 高 度 小 于 统一 高 度 的 三 角 珍 隶属 度 限 数 , 则 使 用 trapmf 盟 数 。 
【 例 15-11】 创建 三 角形 隶属 度 图 数 曲 线 。 编 程 如 下 : 


"证 


f(x; Csch) = max (min( 


clc,clear,close all 
X=0:0.1:10- 

v= trimf(x,[368|]); 
plot(x,vy, 'linewidth',2) 
xlabel('trimf, P= [368]') 
grid on 

axis tight 


运行 程序 ,输出 图 形 如 图 15-14 所 示 。 
1.0 一 一 一 - 
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trimf, P=[3 6 8] 


图 15-14 三 角形 隶属 度 函 数 曲线 


《了 


上 
人 
回国 


-MATLAB 科 学 计算 
创建 不 同 三 角形 隶属 度 清 数 曲 线 ,编程 如 下 : 


clc,clear,close all 
XX 一 0:0.2:10)°": 
YL = trimft(x,[3 4 5]): 
vy2 = trimf(lx,[2 47 ])}); 
vy3 = trimf(x,[1 4 9]1); 
subplot(2,1,1), 
plot(x, [yl y2 Y3 ]); 
grid on 
| axis tight 
v1 = trimE(x,[2 3 5]): 
vy2 = trimf(x,[3 47]); 
Y3 = trimf(x,[4 5 91); 
subplot(2,1,2), 
plot(x, [YL y2 y3 ]); 
grid on 
axis tight 


运行 程序 ,输出 图 形 如 图 15-15 所 示 。 


图 15-15 不 同 三 角形 隶属 度 图 数 遇 线 


15.1.12 Z 形 隶 属 度 函 数 


MATLAB 中 过 形 隶属 度 图 数 为 zmf() ,其 格式 如 下 : 
y = zmf(x,|[abl]) 


其 中 ,xz 为 日 变量 ; a 和 2 为 参数 ,确定 曲线 的 形状 。 
【 例 15-12】 创建 Z 形 隶 属 度 子 数 曲 线 。 编 程 如 下 : 
clc,clear,close all 


X=0:0.1:10; 
Y= zmf(x,[3 71); 


plot(x,vy, 'linewidth',2) 
xlabel('zmf, P= [3 71]') 
grid on 

axis tight 


且 


运行 程序 ,输出 图 形 如 图 15-16 所 示 .。 
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zmtf, P=[3 7] 
图 15-16 Z 形 隶属 度 函 数 曲 线 


创建 不 同 Z 形 隶 属 度 晒 数 曲线 .编程 如 下 : 


clc,clear,close all 

TX = 0:0.1:10; 

subplot(3,1,1); 

plot(x, zmf (x, [2 8]1),'linewidth',2):; 
grid on 

subplot(3,1,2); 

plot(x, zmf (x, [4 6]),'linewidth',2):; 
grid on 

subplot(3, 了 3) 7 

plot(x, zmf (x, [6 41),'linewidth',2):; 
grid on 

axis tight 


运行 程序 .输出 图 形 如 图 15-17 所 示 。 
15. 1.13 ”两 个 隶属 度 函 数 之 间 转 换 参 数 


MATLAB 中 两 个 隶属 度 限 数 之 加 转换 参 数 函 数 为 mfzmf() ,其 格式 如 下 : 

outParams = mf2mf( inParams, inType, outType) 

此 函数 根据 参数 集 .将 任意 内 建 的 隶属 度 函 数 类 型 转换 为 男 一 种 类 型 ,inParams 为 
要 转 斤 的 隶属 度 困 数 的 参数 ,inType 为 要 转换 的 隶属 度 肾 数 的 类 型 的 衬 全 串 名 称 ， 
outType 为 要 转换 成 的 目标 隶属 度 归 数 的 字 从 串 名 称 。 
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mf2mf (mfpl, 'gbellmf', 'trimf'); 


plot(x, gbellmf (x, mfpl),x,trimf(x, mfp2)) 


【 例 15-13】 求解 两 个 隶属 度 图 数 之 间 
行程 序 , 输 出 图 形 如 图 15-18 所 
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也 就 是 弹出 未 定义 的 基本 FIS 编辑 器 。 
在 MATLAB 命令 窗口 输入 : 


fuzzy(fismat) 和 使 用 fuzzvy() ,弹出 如 图 15 一 19 所 示 的 FIS 编辑 器 


运行 程序 ,输出 图 形 如 图 15-19 所 示 。 


| Fuzzy Logic Designer: tpper 
Fle Edit View 


图 15-19 模糊 工具 箱 


编辑 器 是 任意 模糊 推理 系统 的 高 层 显 示 :, 它 允许 调用 各 种 其 他 的 编辑 器 来 对 其 进行 
操作 。 此 界面 允许 用 户 方 便 地 访问 所 有 其 他 的 编辑 着, 并 以 最 灵活 的 方式 与 模糊 系统 进 
行 交 互 。 

1. 方 框图 

窗口 上 方 的 方 框图 显示 了 输入 .输出 和 它们 中 间 的 模糊 规则 处 理 硕 。 单 击 任意 一 个 
变量 框 ,使 选中 的 方 框 成 为 当前 变量 ,此 时 它 变 成 红色 高 亮 方 框 。 双 击 任 意 一 个 变量 , 弹 
出 隶属 度 果 数 纲 辑 硕 ,双击 模糊 规则 编辑 般 ,弹出 规则 顷 辑 十 。 

2. 菜单 项 

FIS 编辑 器 的 全 单 命令 允许 用 户 打 开 相 应 的 工具 ,打开 并 保存 系统 。 

1) File 菜单 

(1) New mamdani FIS: 打开 新 mamdani 型 系统 。 

(2) New Sugeno FIS: 打开 新 sugeno 型 系统 。 
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(3) Open from disk: 从 磁 鼻 上 打开 指定 的 .fis 文件 系统 。 
(4) Save to disk: 保存 当前 系统 到 磁盘 上 的 一 个 .fis 文件 上 。 
(5) Save to disk as: 重 命名 方式 保存 当前 系统 到 磁盘 上 。 
(6) Open from workspace: 从 工作 空间 中 指定 的 FIS 结构 变量 装 人 一 个 系统 。 
(7) Save to workspace: 保存 系统 到 工作 空间 中 当前 命名 的 FIS 结构 变量 中 。 
(8) Save to workspace as; 保存 系统 到 工作 空间 中 指定 的 FIS 结构 变量 中 。 
(9) Close windows: 关闭 GUI， 

) 2) Edit 染 单 

\ (1) Add input: 增加 另 一 个 输入 到 当前 系统 中 。 

(2) Add output: 增加 另 一 个 输出 到 当前 系统 中 。 

(3) Remove variable: 删除 一 个 所 选 的 变量 。 

(4) Undo: 恢复 当前 最 近 的 改变 。 

3) View 豆单 

(1) Edit MFs: 调用 隶属 度 函 数 编 辑 兹 。 


| (2) Edit rules: 调用 规则 编辑 器 。 

(3) Edit anfis: 只 对 单 输出 sugeno 型 系统 调用 编辑 器 。 
(4) View rules: 调用 规则 观察 器 。 

(5) View surface: 调用 曲面 观察 兹 。 

| 3. 弹出 式 菜 单 


用 五 个 弹出 式 采 单 来 改变 模糊 缠 含 过 程 中 五 个 基本 步骤 的 功能 。 
\ (1) And method: 为 一 个 定制 操作 选择 
: (2) Or method; 为 一 个 定制 操作 选择 max、probor( 概 率 ) 或 Custom 。 

(3) Implication method: 为 一 个 定制 操作 选择 min、prod 或 Custom; 此 项 对 sugeno 
型 模糊 系统 不 可 用 。 

(4) Aggregation method: 为 一 个 定制 操作 选择 max、sum、probor 或 Custom。 此 项 
对 sugeno 型 柑 糊 系统 不 可 用 。 

《5) Defuzzification method: 对 mamdani 型 推理 ,为 一 个 定制 操作 选择 centroid( 面 
积 中 心 法 ) 、bisector( 面 积 平 分 法 ) .mom( 平 均 最 大 隶属 度 法 )、som( 最 大 隶属 度 最 小 值 
法 ) .ljom( 最 大 隶属 度 最 大 值 法 ) 或 Custom。 对 sugeno 型 推理 ,在 wtaver( 加 权 平 均 ) 或 
wtsum( 加 权 和 ) 之 加 和 选择。 


min prod 或 Custom 。 


15.1.15 隶属 度 孙 数 编辑 剖 


/ MATLAB 中 隶属 度 函 数 编辑 器 函数 为 mfedit() ,其 格式 如 下 | 
\ mfedit( 'a') 
| mfedit(a) 

mfedit 


mfedit('a' 生成 一 个 隶属 度 图 数 编辑 希 ,并 人 允许 检查 和 修改 存储 在 文件 a. fis 中 下 LS 


结构 的 所 有 隶属 度 图 数 。 在 MATLAB 命令 窗口 输入 : 


mfedit( 'tank') 


运行 程序 ,产生 如 图 15-20 所 示 工 具 箱 图 。 
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图 15-20 tank. fis 隶属 度 肾 数 


mfedit(C'tank' 以 这 种 方式 打开 隶属 度 图 数 编辑 大 并 闻 人 tank. fis 中 存储 的 所 有 隶 
属 度 晒 效 。 

mfedit(a) 对 于 FIS 结构 操作 一 个 MATLAB 工作 空间 变量 a。mfedit 可 单独 弹出 没 
有 冯 人 下 IS 的 隶属 度 晒 数 编辑 大 。 

在 ANFIS 编辑 硕 GUI 上 ,有 一 个 某 单 棒 人 允许 用 户 打 开 相 关 的 GUI 工具 .打开 和 保 
存 系 统 等 。File 某 单 与 FIS 编辑 器 上 的 File 菜单 功能 相同 。 

1) Edit 溪 单 

(1) Add MF: 为 当前 语言 变量 增加 隶属 度 困 效 。 

(2) Add custom ME : 为 当前 语言 变量 增加 定制 的 隶属 度 困 数 。 

(3) Remove current ME : 删除 当前 的 隶属 度 困 数 。 

(4) Remove all MFS: 删除 当前 语言 变量 的 所 有 隶属 度 图 数 。 

(5) Undo: 恢复 当前 最 近 的 改变 。 

2) View 药 单 

(1) Edit FIS properties: 调用 FIS 编辑 器 。 

(2) Edit rules: 调用 规则 编辑 需 。 

(3) View rules: 调用 规则 观察 器 ， 

(4) View surface: 调用 曲面 观察 器 。 
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15.2 模糊 推理 结构 


柑 糊 推理 结构 (fuzzy inference structure, FIS) 根 据 用 户 目 己 选 定 的 隶属 度 了 旧 数 进行 
相关 设计 ,MATLAB 工具 箱 提 供 了 大 量 的 因数 供用 户 产 生 相 应 的 FIS 结 构 , 具体 
如 下 。 


15.2.1 不 使 用 数据 聚 类 从 数据 生成 FIS 


MATLAB 不 使 用 数据 聚 类 从 数据 生成 FIS 的 函数 为 genfis10 ,其 格式 如 下 : 


fismat = genftisl(datal) 
fismat = genfisl(data,numMFs, inmftype, outmftype) 


genfisl 为 anfis 训练 生成 一 个 sugeno 型 作为 初 巡 条件 的 FIS( 初 怒 隶 属 度 陨 数 )， 
genfisl(data,numMFs,inmf{ftype,， outmftype) 使 用 对 数据 的 网 格 分 割 方法 ;从 训练 数据 
集 生成 一 个 FIS。 

data 是 训练 数据 矩阵 ,| 了 绪 最 后 一 列表 示 单 一 输出 数据 外 , 它 的 其 他 各 列表 示 输 入 数 
据 。numMeFs 是 一 个 回 量 : 它 的 坐标 指定 与 每 一 输入 相关 的 隶属 度 图 数 的 数量 。 如 条 想 
使 用 每 个 输入 相关 的 相同 数量 的 隶属 度 图 数 : 那 么 只 需 使 numMFs 成 为 一 个 数 束 足够 
了 。inmftype 是 一 个 字符 串 数 组 , 它 的 每 行 指定 与 每 个 输入 相关 的 隶属 度 果 数 类 型 。 
outmftype 是 一 个 字符 串 数组 ,人 它 的 每 行 指定 与 每 个 输出 相关 的 隶属 度 限 数 类 型 。 


clc,clear,close all 

data = [rand(10,1) 10x% rand(10,1}—5 rand(10,1)1]:; 
numMFs = [3 7]; 

mfType = str2mat( 'pimf', 'trimf').; 
fismat = genfisl(data,numMFs, mfType).; 
[x, mf] = plotmf(fismat, 'input',1).; 
subplot(2,1,1), 

plot(x, mf ); 

grid on 

xlabel('input 1 (pimf)'); 

[x, mf] = plotmf(fismat, 'input',2); 
subplot(2,1,2), 

plot(x, mf ); 

xlabel{'input 2 (trimf})'); 

grid on 

axis tight 


运行 程序 ,输出 图 形 如 图 15-21 所 示 。 


input 2(trimf) 


图 15-21 不 使 用 数据 聚 类 方法 从 数据 生成 FIS 


15.2.2 使 用 减法 聚 类 从 数 杨 生 成 FIS 


MATLAB 中 使 用 减法 聚 类 从 数 要 生 成 FIS 的 函数 为 genfis2() ,其 格式 如 下 : 


fismat = genfis2(Xin,Xout, radii) 

fismat = genfis2(Xin, Xout, radii,xBounds) 

fismat = genfis2(Xin,Xout, radii,xBounds,options) 

Xin 是 一 个 矩阵 , 它 的 每 一 行 包 含 一 个 数据 点 的 输入 值 ， Xout 是 一 个 矩阵 , 它 的 每 
一 行 包含 一 个 数据 点 的 输出 值 ; radii 是 一 个 向 量 , 它 指定 一 个 聚 类 中 心 在 一 个 数据 维 上 
作用 的 范围 ,这 里 假定 数据 位 于 一 个 单位 超 立方 体内 : xBounds 是 一 个 2XN 可 选 矩阵 ， 
它 用 于 指定 如 何 将 Xin 和 Xout 中 的 数据 映射 到 一 个 超 立 方 体内 ,这 里 是 数据 的 维 数 ( 行 
数 ) ，options 是 一 个 可 选 向 量 , 它 指定 的 值 用 于 覆盖 算法 参数 的 默认 值 。 


fismat = genfis2(Xin,Xout,0.s5) 


这 是 使 用 此 函数 所 需 的 最 小 变量 数 。 这 里 对 所 有 数据 维 指定 0.5 的 作用 范围 


fismat = genfis2(Xin,Xout,[0.5 0.25 0.3]) 


这 里 假定 组 合 的 维 数 是 3。 假 设 Xin 有 两 维 、Xout 有 一 维 , 那 么 ,0.5 和 0.25 是 Xin 
效 据 维 中 每 一 维 的 作用 范围 :0.3 是 Xout 数据 维 的 作用 范围 。 

fismat = genfis2(Xin,Xout,0.5,[—10 -50;105 20]) 

这 里 指定 了 了 如何 将 Xin 和 Xout 中 的 数据 规范 化 为 L0 1 区 间 中 的 全 来 进行 处 理 。 
假设 Xin 有 两 维 、Xout 有 一 维 , 那 么 Xin 第 一 列 中 的 数据 是 从 [一 10 十 10] 比 例 变 换 后 
的 值 ,Xin 第 二 列 中 的 数据 是 从 L 一 5 十 5 比例 变换 后 的 值 ,Xout 中 的 数据 是 从 [0 20 
比例 变换 后 的 值 。 
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15.2.3 生成 FIS 曲面 


MATLAB 中 生成 FIS 曲面 的 图 数 为 gensurf() ,其 格式 如 下 : 

(1) gensurf(fis)。 使 用 前 两 个 输入 和 第 一 个 输出 来 生成 给 定 模 糊 推 理 结 构 (FIS) 的 
输出 曲面 。 

(2) gensurf(fis,inputs,output)。 使 用 分 别 由 向 量 inputs 和 标量 output 给 定 的 输 
人 (一 个 或 两 个 ) 和 输出 (只 允许 一 个 ) 来 生成 一 个 图 形 ，。 

(3) gensurf(fis,inputs,output,grids)。 指 定 和 (第 一 水平) 和 Y( 第 二 .和 王 直 ) 方 回 
的 网 格 数 。 如 条 是 二 元 回 量 :X 和 Y 方 回 上 的 网 格 可 以 独立 设置 。 

(4) gensurf (fis, inputs.outputygrids,refinput)。 用 于 和 多 于 两 个 的 输 人 ,refinput 回 
量 的 长 度 与 输入 相同 。 将 对 应 于 要 显示 的 输入 的 refinput 项 ,设置 为 NaN; 对 其 他 输入 
的 固定 值 设置 为 双 精 度 实 标量 。 

(5) [x,y,zj] 一 gensurf(…)。 返 回 定 义 输出 曲面 的 变量 并 且 删 除 自动 绘图 。 

产生 FIS 输出 曲面 ,调用 MATLAB 自 带 文件 ,编程 如 下 : 


clc,clear,close all 

a = readfis( 'tipper'):; 
gensurf(a) 

axis tight 

grid on 


box on 


运行 程序 ,输出 图 形 如 图 15-22 所 示 。 
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图 15-22 FIS 输出 曲面 


15.2.4 mamdani 型 FIS 转换 为 sugeno 型 FIS 


MATLAB 中 mamdani 型 FIS 转换 六 sugeno FIS 的 图 数 为 mam2sug(), 其 格式 
如 下 : 


sug fis= mam2sug(mam fis) 


该 图 效 将 一 个 mamdani 型 FIS(C 不 必 是 单 输出 )mam_fis 转化 为 一 个 sugeno 型 结构 
sug_fis。 返 回 的 sugeno 型 系统 具有 稼 值 输出 隶属 度 上 因数 。 这些 各 值 由 原来 mamdani 型 
系统 的 后 件 的 隶属 度 图 数 的 面积 中 心 法 来 确定 。 前 件 仍 保持 不 变 


15.2.5 完成 模糊 推理 计算 


MATLAB 中 人 完成 模糊 推理 计算 的 明 数 为 evalfis() ,其 格式 如 下 : 


output = evalfis(input,fismat) 

output = evalfis(input,fismat, numPts) 

[output, IRR, ORR, ARR] = evalfis(input,fismat) 

[output, IRR, ORR, ARR] = evalfis(input,fismat, numPts) 

说 明 : 

《1) input: 指定 输入 值 的 一 个 数 或 一 个 矩阵 ,如 条 输入 是 一 个 MXN 和 矩阵 ,其 中 性 
是 输入 杰 量 数 :, 那 么 evalfis 使 用 input 的 每 一 行 作 为 一 个 输入 回 量 ,并 且 为 变量 output 
返回 MXxL 和 矩阵 ,该 矩阵 每 一 行 是 一 个 同 量 并 且 工 是 输出 变量 数 。 

(2) fismat: 要 计算 的 一 个 下 IS 。 

(3) numPts: 一 个 可 选 变 量 , 它 表 示 在 输入 或 输出 范围 内 的 采 桩 点数, 在 这 些 点 上 计 
算 隶 属 度 明 数 , 如 采 不 使 用 此 变量 , 驶 使 用 101 点 的 默认 但 。 

evalfis 的 值 域 如 下 : 

(1) output: 大 小 为 MXL 的 输出 矩阵 ,这 里 M 表示 前 面 指 定 的 输入 值 的 数量 ,上 表 
志 FIS 的 输出 变量 数 。evalfis 的 可 选 值 域 变量 只 有 当 input 是 一 个 行 回 量 时 才 计 算 。 这 
些 可 选 什 域 变量 是 IRR .ORR.、ARR， 

(2) IRR: 通过 隶属 度 恩 数 计 算 的 输入 变量 的 结 朱 ,这 是 一 个 大 小 为 numRules 
的 矩阵 ,这 里 numRules 是 规则 条 数 ,N 是 输入 变量 数 。 

(3) ORR; 通过 隶属 度 果 数 计 算 的 输出 变量 的 结 末 ,这 是 一 个 大 小 为 numRules XxL 
的 矩阵 ,这 里 numRules 是 规则 条 数 ,L 是 输出 变量 数 , 此 矩阵 的 第 一 组 numRules 列 对 应 
于 第 一 个 输出 ,第 二 组 numRules 列 对 应 于 第 二 个 输出 ,依次 类 推 。 

(4) ARR : 对 每 个 输出 ,在 输出 值 域 中 ,numPts 处 采样 合成 值 的 umPts 广 工 和 矩阵 ， 
当 只 有 一 个 值 域 变量 调用 时 ,该 盟 数 使 用 由 结构 fismat 指定 的 模糊 推理 系统 ,由 标量 或 
定 阵 inout 指定 的 输入 值 计 算 输 出 同 量 output。 

调用 evalfis() 畏 效 完 成 模糊 推理 计算 , 纲 程 如 下 : 


clc,clear, close all 
fismat = readfis( tipper’'):; 
out = evalfis([2 1; 4 9],fismat) 
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Gut 三 
7.0169 
19.68310 


15.2.6 模糊 均值 聚 类 


MATLAB 中 模糊 均值 聚 类 的 图 数 为 fcm() ,其 格式 如 下 : 

1) | center, U,obj fcn| = fcm(data,cluster n) 

对 给 定 的 数据 集 应 用 模糊 c 均值 聚 类 方法 进行 聚 类 ， 

(1) data: 要 聚 类 的 数据 集 , 每 行 是 一 个 采样 数据 点 。 

(2) cluster n; 聚 类 中 心 的 个 数 ( 大 于 1)。 

(3) center: 迭代 后 得 到 的 聚 类 中 心 的 矩阵 ,这 里 每 行 给 出 聚 类 中 心 的 坐标 。 

(4) U: 得 到 的 所 有 点 对 聚 类 中 心 的 模糊 分 类 和 矩阵 或 隶属 度 图 数 和 矩阵 。 

《5) obj_fcn: 迭代 过 程 中 ,目标 也 数 的 值 。 

2) fcm(data,cluster n,;options) 

使 用 可 选 的 变量 options 控制 聚 类 参数 ,包括 停止 准则 ,和 /或 设置 迭代 信息 显示 。 

(1) options(1): 分 类 算 阵 世 的 指数 , 软 认 全 是 2.0。 

(2) options(2) : 最 大 友 代 次 数 , 默 认 便 是 100。 

(3) options(3) : 最 小 改进 量 , 即 迭代 停止 的 误差 准则 ,默认 值 是 le-5。 

(4) options(4): 迭代 过 程 中 显示 信息 ,默认 值 是 1。 

如 采 任 意 一 项 为 NaN, 这 些 选 项 就 使 用 上 默 认 值 ; 当 达 到 最 大 达 代 次 数 时 ,或 目标 函 
数 两 次 连续 迭代 的 改进 量 小 于 指定 的 最 小 改进 量 , 即 满足 集 止 误差 准则 时 , 聚 类 过 程 
结束 。 

产生 随机 数据 ,进行 均值 聚 类 分 析 。 编 程 如 下 : 


clc,clear,close all 

data = rand(100, 2); 

[center,U,ob]j fcn] = fcm(data, 2); 

plot(data( :,1), data(:,2),'0'); 

maxU = max(U); 

indexl] = find(U(1,:) == maxl]):; 

index2 = find(U(2, :) == maxl]); 

line(datal( indexl,1), data(indexl, 2), 'linestyle', 'none', 'marker', ‘x ', 'color', 'g'); 
line(datal( index2,1), data(index2, 2), 'linestyle', 'none', ‘'marker’', '¥% ', 'color', 'r'); 
axis tight 

grid on 

box on 


运行 程序 ,输出 图 形 如 图 15-23 所 示 。 
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图 15-23 ”模糊 均值 聚 类 


15.2.7 模糊 均值 和 减法 聚 类 


MATLAB 中 模糊 均值 和 减法 聚 类 的 因数 为 fndcluster() ,其 格式 如 下 : 
findcluster( 'file. dat') 


findcluster 产生 一 个 GUI 上 的 Method 下 的 下 拉 式 标签 ,可 以 实现 模糊 C 均值 
(fcmy) 或 模糊 减法 聚 类 (Csubtractiv) ,使 用 Load Data 按钮 输 人 数据 , 刚 进 人 GUI 时 ,对 每 
种 方法 的 选项 部 设置 为 默认 值 。 

此 工具 使 用 多 维 数 据 集 ,但 只 显示 这 些 维 数 中 的 两 维 。 使 用 X-axis 和 Y-axis 下 的 
下 拉 式 标签 选择 想 观 察 的 数据 维 。 例 如 ,有 一 个 五 维 数据 集 , 按 照 出 现在 数据 集中 的 顺 
序 ,; 此 工具 将 数据 标记 为 data 1 .data 2、data 3.、data 4、data 5，Start 将 完成 聚 类 ,Save 
Centre 将 保存 聚 类 中 心 :。 

当 使 用 数据 集 file. data 时 ,findcluster(file. dat) 自动 装 人 数据 集 ,并 且 只 绘制 数据 集 
中 的 前 两 维 。 产 生 GUI 后 : 仍 可 以 选择 要 聚 类 数据 的 那 两 维 。 

调用 MATLAB 聚 类 工具 箱 ,编程 如 下 : 


clc,clear, Close all 
findcluster( 'clusterdemo. dat') 


运行 程序 ,输出 图 形 如 图 15-24 所 示 。 
15.2.8 绘制 FIS 


MATLAB 中 绘制 FIS 的 函数 为 plotfis() ,其 格式 如 下 : 


plotfis(fismat) 
此 滑 数 显示 由 fismat 指定 的 一 个 FIS 的 高 层 方 框 图 ,输入 和 它们 的 隶属 度 图 数 出 现 
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图 15-24 工具 箱 使 用 


在 结构 特征 图 的 左边 ,同时 输出 和 它们 的 隶属 度 图 数 出 现在 结构 特征 图 的 右边 。 
绘制 FIS ,程序 如 下 : 


clc,clear,close all 
a = readfis( 'tipper'):; 
plotfis(a) 


运行 程序 ,输出 图 形 如 图 15-25 所 示 。 
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图 15-25 绘制 FIS 


15.2.9 绘制 给 定 变 量 的 所 有 隶属 度 男 数 曲 线 


MATLAB 中 绘制 给 定 变 量 的 所 有 隶属 度 上 数 曲线 的 图 数 为 blotmf() ,其 格式 如 下 : 


plotmf(fismat,varType, varIndex ) 


此 函数 绘制 与 给 定 变 量 相 关 的 称 为 fismat 的 FIS 中 的 所 有 隶属 度 函 数 曲 线 ,变量 的 
类 型 和 索引 分 别 由 varType (0'input ' 或 'output') 和 varIndex 给 出 。 此 上 力 数 也 可 以 与 


MATLAB 阴 数 subplot 一 起 使 用 。 
绘制 FIS 文件 中 推理 隶属 度 肾 数 曲 线 , 编 程 如 下 : 
clc,clear,close all 


a = readfis( 'tipper'); 
plotmf(a, ‘input',1) 


运行 程序 ,输出 图 形 如 图 15-26 所 示 。 
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图 15-26 推理 隶属 度 曲 线 显示 


15.2.10 从 三 长 装 人 下 IS 


MATLAB 中 从 磁盘 装 入 FIS 的 函数 为 readfis() ,其 格式 如 下 : 


fismat = readfis( 'filename') 


从 磁 鼻 上 的 一 个 . fis 文件 (由 filename 命名 ) 计 出 一 个 模糊 推理 系统 ,并 将 产生 的 
FIS 装 入 当前 的 工作 空间 中 。fismat 二 readfis 不 带 输 入 变量 , 即 没 有 指定 文件 名 时 ,使 
用 uigetfile 命令 打开 一 个 对 话 框 ,提示 用 户 指定 文件 的 名 称 和 目录 位 置 。 

获取 FIS 文件 信息 ,程序 如 下 


clc,clear,close all 
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fismat = readfis( 'tipper'); 
getfis(fismat) 


运行 程序 ,输出 结果 如 下 : 


Name = tipper 
Type = mamdani 
NumInputs = 2 
InLabels = 

SeIVICe 

food 
NumOQutputs = 1 
OutLabels = 

tip 
NumRules = 3 
AndMethod = min 
OrMethod = max 
ImpMethod = min 
AggMethod = max 
DefuzzMethod = centroid 

ans = 


tipper 


15.2.11 从 FIS 中 有 删除 某 一 隶属 度 困 数 


MATLAB 中 从 FIS 中 删除 某 一 隶属 度 图 数 的 图 数 为 rmmf() ,其 格式 如 下 : 
fis = rmmf(fis, 'varType', varIndex, 'mf', mfIndex) 


从 与 工作 空间 FIS 结构 fis 相关 的 模糊 推理 系统 中 删除 变量 类 型 为 varType, 索 引 为 
varIndex 的 隶属 度 晒 数 mfIndex。 

(1) varType 必须 是 input 或 output。 

(2) varIndex 是 表示 变量 索引 的 一 个 整数 ,此 索引 表示 列 出 变量 的 顺序 。 

(3) mf 是 表示 隶属 度 困 数 的 一 个 字符 串 。 

(4) mfIndex 是 表示 隶属 度 明 数 索 引 的 一 个 整数 ,此 索引 表示 列 出 隶属 度 果 数 的 
顺序 。 

编程 如 下 : 


clc,clear,close all 

a = newfis( 'mysys'):; 

a = addvar(a, 'input', 'temperature', [0 1001); 

a = addmf (a, Input' 1 cold'， trimnt' [0 30 60|]); 
getfis(a, 'input',1) 


NumInputs = 2 
InLabels = 

SerVice 

food 
NumOutputs = 1 
OutLabels = 

tip 
NumRules = 3 
AndMethod = min 
OrMethod = max 
ImpMethod = min 
AggMethod = max 
DefuzzMethod = centroid 

ans = 
tipper 

Name = temperature 
NumMFs = 1 
MFLabels = 

cold 
Range = [0 100 |] 


Name: 'temperature' 
NumMFs: 1 

mfl1]: ‘cold" 
range: [0 100 | 


15.2.12 ”从 FIS 中 删除 变量 


MATLAB 中 从 FIS 中 删除 变量 的 函数 为 rmvar() ,其 格式 如 下 : 


[fis2,errorstr|] = rmvar(fis, 'varType', varIndex ) 

fis2 = rmvar(fis, 'varType', varIndex) 

(1) fis2 一 rmvar(fis,;,'varType',;varIndex)。 从 与 工作 空间 FIS 结构 fis 相关 的 模糊 
推理 系统 中 删除 索引 为 varIndex 的 语言 变量 mf{fIndex。 字 人 稚 串 varType 必须 是 input 或 
output。varIndex 是 表示 变量 索引 的 一 个 整数 .此 对 引 表 示 列 出 变量 的 顺 订 。 

(2) | fis2,errorStr | 一 rmvar(fis, 'varType'yvarIndex)。 将 任何 错误 信息 返回 到 字 
得 串 errorStr 。 

此 命令 目 动 更 新 规则 列表 以 保证 列表 扩 才 与 当前 变量 数 傈 持 一 致 ,在 删除 语言 变量 
之 前 ,必须 从 FIS 删除 任何 包含 要 删除 变量 的 规则 ,无 法 删除 在 规则 列表 中 正在 使 用 的 
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编程 如 下 : 


a = newfis( 'mysys').; 
a = addvar(a, 'input', 'temperature',[0 100|]); 
getfis(a) 


NumlInputs = 1 
JnLabels = 
temperature 

Numuwutputs = 0 
OutLabels = 
NumRules = 0 
AndMethod = min 
OrMethod = max 
ImpMethod = min 
AggMethod = max 
DefuzzMethod = centroid 

ans = 

mysys 


从 FIS 中 删除 变量 ,调用 rmvar() 畏 数 如 下 : 


b = rmvar(a, 'input',1).; 
getfis(b) 


运行 程序 ,输出 结 采 如 下 : 


Name = mysys 
Type = mamdani 
NumInputs = 0 
InLabels = 
Numuutputs = 0 
OutLabels = 
NumRules = 0 
AndMethod = min 
OrMethod = max 
ImpMethod = min 
AggMethod = max 
DefuzzMethod = centroid 

ans = 

mYSsyYs 


15.2.13 设置 模糊 系统 属性 


MATLAB 中 设置 模糊 系统 属性 的 因数 为 setfis() ,其 格式 如 下 : 


a = setfis(a, 'fispropname', 'newfisprop') 
a = setfis(a, 'vartype', varindex, 'varpropname', 'newvarprop') 


a = setfis(a, 'vartype', varindex, 'mf', mfindex, 'mfpropname’', 'newmfprop'):; 


可 以 使 用 3 个 .5 个 或 7 个 输入 变量 调用 setfis 命令 ,使 用 几 个 输入 变量 取决 于 是 否 


设置 整个 结构 的 一 个 属性 ,是 否 设 置 属于 该 结构 的 一 个 特定 变量 ,以 及 是 否 设置 属于 这 
些 变量 之 一 的 一 个 特定 


隶属 度 阴 数 。 

(1) a: 工作 空间 中 FIS 的 一 个 变量 名 称 。 
(2) vartype: 表示 变量 类 型 的 一 个 字符 串 input 或 output。 
(3) varindex: 输入 或 输出 变量 的 索引 | 。 

(4) mf: 调用 setfis 时 ,7 个 变量 中 的 第 4 个 变量 


三 


业 所 用 的 字符 串 , 用 于 指明 此 变量 是 


-个 隶属 度 函 数 。 


(5) mfindex: 属于 所 选 变量 的 隶属 度 函 数 的 索引 。 
(6) fispropname: 表示 要 设置 FIS 域 属性 的 一 个 宇 符 串 name、type、andmethod 、 


ormethod impmethod .aggmethod. defuzzmethod., 


(7) newfisprop: 要 设置 的 FIS 的 属性 或 方法 名 称 的 一 个 字符 串 。 
(8) varpropname: 要 设置 的 变量 域名 称 的 一 个 字符 串 name 或 range。 
(9) newvarprop: 要 设置 的 变量 名 称 的 一 个 字符 串 ( 对 name) ,或 变量 范围 的 一 个 数 


组 (对 range) 。 


(10) mfpropname: 要 设置 的 隶属 度 上 因数 名 称 的 一 个 字符 果 name、type 或 params。 
(11) newmfprop: 要 衣 置 的 隶属 度 上 图 数 名 称 或 类 型 域 的 一 个 字符 串 ( 对 name 或 


type) 或 者 是 参数 范围 的 一 个 数组 (对 params) 。 


使 用 3 个 变量 调用 ,编程 如 下 : 
a = readfis( 'tipper'); 


a2 = setfis(a, ‘name', 'eating'); 
getfis(a2, 'name'); 


运行 程序 ,输出 结果 如 下 : 


Gut 三 


eating 


如 果 使 用 5 个 变量 ,setfis 将 更 新 两 个 变量 属性 。 程 序 如 下 


a2 = setfis(a, ‘input',1, 'name', help'); 
getfis(a2, 'input', 1, 'name') 


Ia 行程 序 ， 输出 结果 如 下 : 


ans = 
help 


如 采 使 用 ?7 个 变量 ,setfis 将 更 新 7 个 隶属 度数 的 任意 属性 。 和 程序 如 下 : 


《了 


i 


€71 
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a2 = setfis(a, 'input',1, 'mf',2, 'name', Wetched ' ) : 
getfis(a2, 'input',1, 'mf',2, 'name') 


运行 程 订 ,输出 结 来 如 下 : 


aNs ”三 
WIetched 


15.2.14 以 分 行 形 式 显示 FIS 所 有 属性 


MATLAB 中 以 分 行 形式 显示 FIS 所 有 属性 的 果 数 为 showfis() ,其 格式 如 下 : 
showfis(fismat) 


以 分 行 方式 显示 MATLAB 工作 空间 FIS 变量 fismat, 允许 查看 结构 的 每 个 域 的 意 
义 和 内 容 。 
显示 FIS 属性 ,程序 如 下 : 


a 三 readfisl "tipper'}); 
showfis(a) 


运行 程序 ,输出 结 采 如 下 : 


1. Name tipper 
2. TyYpe mamdani 
3. Inputs/OQutputs Lz | 

4. NumInputMF's [3 2] 

D5. NumOQutputMFs 3 

6. NumRules 了 

7. AndMethod min 

3. OrMethod max 

9. ImpMethod min 

10. AggMethod max 

11. DefuzzMethod centroid 
12. InLabels SEIVice 
13. food 

14. OutLabels ti1p 

15. InRange [0 101] 
16. [0 10| 
17. OutRange [0 30 
18. InMFLabels Poor 

19. good 

20 . excellent 
21. rancid 
22. delicious 


23. OutMFLabels cheap 


24. aAVEeIrAaAge 

之 Jenerous 
26. InMFTypes gaussmf 

21. gaussmf 

28. gaussmf 

29. trapmf 

30. trapmf 

31. OutMFTypes trimf 

2. trimf 

本 了 trimf 

34. InMFParams [i.5s000] 
[i.s500] 
36. [1.5100 0] 
37. [O001 3 
38. [7910 10] 
39. OutMFParams [O0510 0] 
40. [10 15 20 0| 
41. [ 20 25 30 0| 
42. Rule hntecedent [1 1 

43. [20] 

44. [3 2|] 

45. Rule Consequent 1 

46. 2 

47. 3 

48. Rule Weigth 1 

49. 1 

50. 1 

51. Rule Connection 2 

Sr 1 

S53 2 


15.2.15 完成 模糊 运算 


MATLAB 中 和 完成 模糊 运算 的 限 数 为 fuzarith() ,其 格式 如 下 : 
C = fuzarith(X, A, B, operator) 


使 用 区 间 算 法 .C 一 fuzarith(X, 和 AA,B, operator) 返 回 一 个 模糊 集 C 作为 结果 ,该 算 
法 使 用 由 字符 串 operator 表示 的 图 数 , 并 在 采样 凸 模糊 集 A 和 BB 上 完成 二 进 制 运算 ; 元 
素 A 和 B 由 采样 值 域 变量 X 的 凸 函数 产生 ; A、B 和 XX 是 相同 维 数 的 向 量 ; operator 是 
串 sum sub .prod and div 之 一 ; 

该 限 数 返回 的 模糊 集 C 是 一 个 与 和 具有 相同 长 度 的 列 回 量 。 

模糊 运算 程序 如 下 ， 

clc,clear,close all 


point n = 101; 
min X = 一 20; max Xx = 20; 


攻 了 


I 

| 

LD 

| 
a 
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XxX = linspace(min x, max 和 Pont mh 

A trapmf{(x, [一 10 一 213]); 

B = gaussmf(x, [25]); 

Cl = fuzarith(x, A, B, sum')}):; 

subplot(2,1,1):; 

plot{(x, A, 'b——', x, B, m:', x Cl, clinewidth',2); 
title( 'fuzzy addition A+ B'); 

C2 = fuzarith(x, A, B, 'sub'); 

subplot(2,1,2); 

plotlx, AR; ‘Db——', x, B, nm:, x Co Cr Tinewidth',2).; 
title( 'fuzzy subtraction A— B'):; 

C3 = fuzarith(x, A, B, 'prod'):; 


运行 程序 ,输出 图 形 如 图 15-27 所 示 。 


fuzzy addition A+B 


图 15-27 模糊 运算 


15.2.16 解 术 模糊 规则 


MATLAB 中 解析 模糊 规则 的 降 


数 为 parsrule() ,其 格式 如 下 : 

fis2 = parsrule(fis,txtRuleList) 

fis2 = parsrule(fis,txtRuleList,ruleFormat) 

fis2 = parsrule(fis,txtRuleList,ruleFormat, lang) 

此 函数 为 MATLAB 工作 空间 FIS 变量 fis 解析 定义 规则 (txtRuleList) 的 文本 ,并且 
返回 添加 了 相应 规则 列表 的 一 个 FIS。 如 果 原 始 输 入 FIS 结构 fis 有 任意 初始 规则 ,它们 
将 由 新 结构 fis2 替换 。 

本 荫 数 支持 二 种 不 同 的 规则 格式 (由 ruleFormat 指定 verbose( 语 谨 型 )、symbolic 
(符号 型 ) indexed( 索 引 型 ) 。 默 认 格 式 是 verbose( 语 言 型 ) 。 当 使 用 可 选 语言 变量 lang 
时 ,规则 以 语言 型 格式 进行 解析 ,并 采用 语言 变量 lang 中 指定 的 关键 字 。 

语言 必须 是 english .francalis 或 deutsch 。 


英语 关键 字 是 if then\is、AND、OR 和 NOT。 
模糊 规则 解析 ,程序 如 下 : 


a = readfis( 'tipper'); 

ruleTxt = 'if service is poor then tip is generous'; 
a2 = parsrule(a,ruleTxt, 'verbose'): 

showrule(a2) 


运行 程序 ,输出 结果 如 下 : 


ans = 
1. If (service is poor) then (tip is generous) (1) 


15.2.17 规则 编辑 如 和 语法 编辑 此 


MATLAB 中 规则 编辑 着 和 语法 编辑 着 的 图 数 为 ruleedit() ,其 格式 如 下 : 

ruleedit( 'a') 

ruleedit(a) 

当 使 用 ruleedit('a') 调 用 规则 编辑 器 时 ,可 用 于 修改 存储 在 文件 a. fis 中 的 一 个 FIS 
结构 的 规则 。 它 也 可 用 于 检查 模糊 推理 系统 使 用 的 规则 。 为 使 用 编辑 器 创建 规则 ,必须 
首先 用 FIS 编辑 器 定义 要 使 用 的 所 有 输入 /输出 变量 ,可 以 使 用 列表 框 和 检查 框 选择 输 
和 人、 输出 变量 ,连接 操作 和 权重 来 创建 新 规则 。 

如 图 15-28 所 示 ,用 ruleeditC'tank' 打开 规 则 编辑 器 并 装 人 tank. fis 中 存储 的 所 有 
规则 。 


|) Rule Editor tank 
Fle Edit View Options 


|_ Willerel EG Ginawl Ye 看 kr 到 到 enogehi) 
2 WH (eveal is low) then (velve mB open_ test) (1) 
3 iilevelis hoh) men valve EB close (est) (|) 
I (lewel i ckay) and (rate Es postive) then (valve a cise sowb) (1) 
5 NH (lewvels okay) and (rate BE negalne) then Ilvalve BG open_ sow) (1) 


图 15-28 模糊 编辑 器 
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在 规则 编辑 各 GUI 上 ,有 一 个 染 单 棒 人 允许 用 户 打 开 相 关 的 GUI 工具、 打开 和 保存 系 
统 等 。File 亲 单 与 FIS 编辑 入 上 的 File 染 单 功能 相同 。 

1) Edit 荣 单 

Undo: 用 于 恢复 最 近 的 改变 。 

2) View 淫 单 

(1) Edit FIS properties: 调用 FIS 纲 辑 策 。 

(2) Edit membership functions: 调用 隶属 度 上 四 数 编辑 大 。 

(3) Edit rules: 调用 规则 编辑 器 。 

(4) View surface: 调用 曲面 观察 器 。 

3) Options 菜单 

(1) Language: 用 于 选择 语言 ,好 English、Deutsch 和 Francais。 

(2) Format: 用 于 选择 格式 。 

QD Verbose: 使 用 单词 ithen、AND、OR 等 创建 实际 语句 。 

@ Symbolic: 用 某 些 符号 代替 Verbose 模式 中 使 用 的 单词 。 例 如 ,“if A AND B 
then C” 成 为 "A 必 B 一 二 C”。 

G@) Indexed: 表示 规则 如 何在 FIS 结构 中 存储 。 


15.2.18 规则 观察 益 和 梗 寡 推 理 框 图 


MATLAB 中 规则 观察 希 和 模糊 推理 框图 的 因数 为 ruleview() ,其 格式 如 下 : 


ruleview( 'a') 


使 用 ruleview('a') 调用 规则 观察 适时 ,将 绘制 在 存储 文件 a. fis 中 的 一 个 FIS 的 模 
糊 推 理 框 图 。 它 用 于 观察 从 开始 到 结束 整个 蕴含 过 程 。 可 以 移动 对 应 输入 的 指示 线 , 然 
后 观察 系统 重新 调节 并 计算 新 的 输出 。 

在 MATLAB 命令 窗口 输入 ruleview('tank' ) ,得 到 模糊 推理 框图 如 图 15-29 所 示 。 


| 本 Rule Viewer tank 


Fle Edit Wiew Dptons 


图 15-29 模糊 推理 框图 


在 规则 编辑 硕 GUI 上 ,有 一 个 沫 单 棒 人 允许 用 户 打 开 相 关 的 GUI 工具 .打开 和 保存 系 
统 等 。File 采 单 与 FIS 编辑 硕 上 的 File 菜单 功能 相同 。 机 


1) View 菜单 i 
(1) Edit FIS properties: 调用 FIS 编辑 全 。 二 


(2) Edit membership functions: 调用 隶属 度 肯 数 编辑 天 。 箱 
(3) Edit rules; 调用 规则 编辑 器 。 
(4) View surface: 调用 曲面 观察 大 。 
2) Options 菜单 
Rules display format: 用 于 选择 显示 规则 的 格式 。 如 采 单 击 模糊 推理 框图 左边 的 规 

则 序号 , 则 与 该 序号 相关 的 规则 出 现在 规则 观察 器 底部 的 状态 栏 中 。 


15.2.19 保存 FIS 到 磁盘 


MATLAB 中 保存 FIS 到 磁盘 的 图 数 为 writefis() ,其 格式 如 下 : 


writefis(fismat) 

writefis(fismat, 'filename') 

writefis(fismat, 'filename', 'dialog') 

(1) writefis 将 一 个 MATLAB 工作 空间 FIS 结构 fismat 用 一 个 . fis 文件 形式 保存 
到 位 扒 上 。 

(2) writefis(Cfismat) 产 生 一 个 对 话 框 让 用 户 输入 文件 的 名 称 和 和 存放 文件 的 目录 。 

(3) writefis(fismat, 'filename') 将 对 应 于 FIS 结构 fismat 的 一 个 .fis 文件 写 到 一 个 
称 为 filename. fis 的 磁盘 文件 中 ,不 使 用 对 话 框 该 文件 被 保存 在 当前 目录 中 。 

(4) writefis(fismat, 'filename'., 'dialog ') 创 建 一 个 带 有 提供 的 默认 名 为 filename. fis 
的 对 话 框 。 

(5) 若 扩 展 名 不 存在 , 则 只 为 filename 添加 .fis 扩展 名 。 

FIS 与 操作 ,程序 如 下 : 


clc,clear,close all 

= newfis('tipper'); 

= addvar(a, 'input', 'service', [0 10]); 

addmf (a, input', 1, poor', ' gaussmf', [1.5 0])， 

= addmf (a, 'input',1,'g 1 rgaussmf', [1.5 51); 

= addmf (a, 'input',1, 'excellent', 'gaussmf',[1.5 10]); 


yg yn 
1 


writefis(a, 'my file') 


运行 程 订 ,输出 结 末 如 下 : 


上 

上 

L 

LD 
-41 
ew 
541 国 | 
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15.2.20 显示 TIS 的 规则 


MATLAB 中 显示 FIS 规则 的 函数 为 showrule() ,其 格式 如 下 : 

SEE ES 

showrule(fis, IndexLIst) 

EGG 

showrule(fis, indexList, format, Lanc) 

此 命令 用 于 显示 与 给 定 系 统 相 关 的 规则 。 

(1) fis 是 必须 提供 的 变量 ,这 是 一 个 FIS 结构 在 MATLAB 工作 空间 中 的 变量 名 。 

(2) indexList 是 要 显示 的 规则 向 量 ( 可 选项 )。 

(3) format 是 一 个 表示 返回 规则 格式 的 字符 串 ( 可 选项 ), showrule 可 以 用 三 种 不 同 
格式 的 任意 一 种 返回 规则 , 即 verbose( 默 认 横 式 , 此 处 English 是 默认 语言 )、symbolic 和 

(4) 和 在 要 恒 用 第 4 个 参数 Lang, 则 Lang 必须 是 verbose( 语 言 ) 型 的 ,并 且 下 面 这 种 
调用 showrule(tfis,indexList,format,Lang) 使 用 Laneg 给 定 的 语言 显示 规则 ,它们 必须 是 
english francais 或 deutsch 。 


调用 MATLAB 目 市 tipper 文件 ,显示 规则 如 下 : 


a = readfis('tipper'); 
showrule(a,1) 


运行 程 订 ,输出 结 末 如 下 : 


ans = 
1. If (service is poor) or (food is rancid) then (tip is cheap) (1) 


显示 规则 2 ,程序 如 下 : 
showrule(a,2) 
运行 程序 ,输出 结果 如 下 : 


Sans 三 


2. If (service is good) then (tip is average) (1) 


显示 规则 3 ,程序 如 下 : 
showrule(a,[3 1],'svymbolic') 
运行 程序 ,输出 结果 如 下 : 
ans = 


3. (service== excellent) | (food== delicious) => (tip = generous) (1) 
1. (service== poor) | (food == rancid) => (tip= cheap) (1) 


显示 规则 1、2、3, 程 序 如 下 : 让 


覆 
showrule(a,1:3,'indexed') 
独 
运行 程序 ,输出 结果 如 下 下 
i 
ans = 


TTL) 
0 21II :1 
2 11l > 


15.3 模糊 聚 类 工具 箱 


数据 聚 类 形成 了 许多 分 类 ,是 系统 建 模 算法 的 基础 之 一 ,并 对 系统 行为 产生 一 种 聚 
类 表示 。MATLAB 模糊 逻辑 工具 箱 装 备 了 一 些 工具 ,使 用 户 能 够 在 输入 数据 中 发 现 聚 
类 ,用 户 可 以 用 聚 类 信息 产生 Sugeno-type 模糊 推理 系统 ,使 用 最 少 规则 建立 最 好 的 数据 
行为 ; 按照 每 一 个 数据 聚 类 的 品质 自动 地 划分 规则 。 这 种 类 型 的 FIS 产生 器 能 被 命令 行 
函数 genfis2() 自动 地 完成 。 


1. fcm 


功能 : 利用 模糊 C 均值 方法 的 模糊 聚 类 ， 
格 下 [center,U, obj_fcn|] = fcm(data, cluster n); 


fcm(data, cluster n,options).; 


2. gentfis2 


功能 : 用 于 减 聚 类 方法 的 模糊 推理 系统 模型 。 
格式 : fismat = genfis2(Xin,Xout, radii) 
fismat = genfis2(Xin, Xout,radii, xBounds) 
fismat = genfis2 (Xin, Xout, radii, xBounds, options) 
说明， 
(1) Xin 为 输入 数据 集 。 
(2) Xout 为 输出 数据 集 。 
(3) radii 用 于 假定 数据 点 位 于 一 个 单位 超 立 方 体内 的 条 件 下 ,指定 数据 向 量 的 每 一 
维 聚 类 中 心 影 啊 的 范围 ,每 一 维 取 从 在 0 一 1 之 间 。 
(4) xBounds 为 2XNN 维 的 矩阵 ,其 中 六 为 数据 的 维 数 。 
(5) options 为 参数 加 量 。 
CU options(1) 一 quashFactor。quashFactor 用 于 与 聚 类 中 心 的 影响 范围 radiil 相 乘 ， 
用 以 决定 某 一 聚 类 中 心 邻 近 的 那些 数据 点 被 排除 作为 聚 类 中 心 的 可 能 性 ,默认 为 1. 25。 
DD options(2) 二 acceptRatio。acceptRatio 用 于 指定 在 选 出 第 一 类 和 从 类 中 心 后 ,只 有 


-MATLAB 科 学 计算 


某 个 数据 点 作为 聚 类 中 心 的 可 能 性 值 蜗 于 第 一 聚 类 中 心 可 能 性 值 的 一 定 比 例 , 只 有 高 于 
这 个 比例 才能 作为 新 的 聚 类 中 心 , 轩 认为 0. 5。 

options(3) 二 rejectRatio。rejectRatio 用 于 指定 在 选 出 第 一 类 聚 类 中 心 后 ,只 有 
某 个 数据 点 作为 聚 类 中 心 的 可 能 性 值 低 于 第 一 聚 类 中 心 可 能 性 值 的 一 定 比 例 , 只 有 低 于 
这 个 比例 才能 作为 新 的 聚 类 中 心 , 积 认 为 0. 15。 

(4) options(4) 一 verbose。 如 果 verbose 为 非 零 值 , 则 聚 类 过 程 的 有 关 傅 息 将 显示 出 
来 :否则 将 不 显示 。 

genfis2 上 因数 程序 如 下 : 


tripdata 
subplot(211),plot(datin)} 
subplot(212),plot(datin) 
fismat = genfis2(datin,datout, 0.5); 
fuzout = evalfis(datin, fismat).; 
trnRMSE = norm( fuzout — datout) /sqrt(length(fuzout)) 
七 TDRMSE = 

0.5276 
figure, 
plot(datout, 'o') 
hold on 
plot(fuzout) 


运行 程序 ,结果 如 图 15-30 和 图 15-31 所 示 。 


Dn WM ed 村 La a 
0 10 20 30 40 30 60 70 80 


图 15-30 训练 数据 


0 10 20 30 40 50 60 70 80 
图 15-31 测试 数据 与 减 类 模糊 推理 系统 输出 数据 


上 

A 

3. subclust 模 
功能 : 数据 的 模糊 减 聚 类 ， 小 
格式 :; [c,s] = subclust(X,radii,xBounds, options) Tr 
具 

说 明 : 箱 
和 包括 用 于 聚 类 的 数据 ,X 的 每 一 行为 一 个 向 量 ; 返回 参数 c 为 聚 类 中 心 向 量 , 向 量 
包含 了 数据 点 每 一 维 聚 类 中 心 的 影响 范围 。 
subclust 肖 数 示例 如 下 : 
[c,s] = subclust(X,0.5):; z 
Te, 3] = subclust(x, [0.5,0. 25,0.3],12.0,0 .8.0 7]); 
4. findcluster | 
功能 : 模糊 C 均值 聚 类 和 子 聚 类 交互 聚 类 的 GUI 工 具 。 
格式 :， findcluster 
程序 如 下 : 
findcluster('clusterdemo. dat') \ 
运行 程序 ,结果 如 图 15-32 所 示 。 \ 
| 二 Clustering 

文件 (日 蝙 纪 (IE) ”查看 (V) 插入 0 ”工具 中 点 面 ID) 窗口 0) 


图 15-32” 聚 类 GUI 窗口 
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15.4 直接 目 适 应 模糊 控制 


直接 模糊 目 适 应 控制 和 同 接 目 适 应 模糊 探 制 所 采用 的 规则 形式 不 同 。 间 接 目 适应 
模糊 控制 利用 的 是 被 挖 对 和 象 的 和 识 , 而 二 接 模 糊 目 适应 控制 采用 的 是 控制 期 识 。 


15.4.1 问题 描述 


考虑 如 下 方程 所 描述 的 研究 对 和 象 
无 一 frr 天 yi) bu (15.1) 
光一 工 (15.2) 
式 中 ,为 未 知 图 数 ; 0 为 未 知 的 正常 数 。 
直接 自 适 应 模糊 控制 采用 下 面 IF-THEN 模糊 规则 来 描述 控制 知识 , 即 
如 果 zi 是 Pi 是 …… zr 是 Pi;y 则 ww 是 忆 ， (15.3) 
式 中 ,P; 和 QQ, 为 尺 中 的 模糊 集合 , 且 r 一 1:,2,… ,Lv。 
设 位 置 指令 为 ym: 令 
em 一 yw 一 yy 一 一 并 ee= [eve ,: ,ee | (15.4) 
选择 人 二 (ks ,ko-D ,&o-5，…:A) ,使 多 项 式 5 十 有 is” ”十 … 十 的 所 有 根 都 在 平 
面 左 半 平 面 上 。 取 控制 规律 为 


= 和 fx) 十 ye” + Kie| 《15.5) 


将 式 (15.5) 代 入 式 (15. 4) ,得 到 闭环 控制 系统 的 方程 为 
ce 十 Re 十 .… 二 ke =0 (15.6) 
K 的 选取 ,可 得 1 一 so 时 ,el(1) 一 0, 即 系统 的 输出 y 渐 近 地 收 人 钱 于 理想 输出 yw。 
直接 目 适 应 模糊 控制 基于 模糊 系统 设计 一 个 反 包 控制 硕 4 王 u(z19) 和 一 个 再 整 参 数 
回 量 4 的 目 适 应 律 , 使 得 系统 输出 y 尽 可 能 地 跟 踩 理想 输出 yw。 


15.4.2 控制 状 设 计 


uo= xp(Z | 0) (15.7) 
式 中 ,up 是 一 个 模糊 系统 ; 9 是 可 调 参 数 集合 。 
模糊 系统 up 可 由 以 下 两 步 来 构造 : 
(1) 对 变量 rz Ci 一 1,2,3,… ;nn) ;定义 m 个 模糊 集合 ALC 二 1 ,2,3,*… ,mm;)。 


《2) 用 以 下 | Ea 条 模糊 规则 来 构造 模糊 系统 wp(zl109) , 即 


Up = Sa x, EAs (15.8) 
式 中 ,一 1,2,3，…， 7712; 1 一 1,2, 3 72。 
采用 乘积 推理 机 、 单 值 模糊 器 和 中 心平 均 解 模糊 器 来 设计 模糊 控制 器 ,有 即 


i 三 
SDT) 
up = (x | 0 = 8 (15.9) 


二 本 ITw。 人 
令 y2 ”是 自由 参数 , 放 在 集合 0OE R= ”中 , 则 模糊 控制 器 为 
up = (x|0 = 0 (xr) (15.10) 


式 中 ,&(zx) 为 [| mi 维 向 量 , 其 第 4…1i 个 元 素 为 
i 二 ] 


Ls 1. 
HA (Ti) 
ES (15. 11) 


模糊 控制 规则 式 (15. 3) 是 通过 设置 其 初始 参数 而 被 府 人 到 模糊 控制 器 中 的 。 
1s.4.3 自 适 应 律 设计 


将 控制 率 方 程 (15.5) .直接 适应 模糊 控制 升 方程 (15.7) 代 人 去 415.1) ,并 整理 得 


e™ 一 一 开 Ie 十 [zx ”一 xzp(Cz 0)] 《15. 12) 
分 
0 1 0 2 0 0 
0 0 1 1- 0 0 
A — 重生 和 重重 闪 生生 闪 生生 和 向 生生 而 面 生 p 一 一 症 三 硬 C15. 13) 
0 0 0 : 0 1 0 
— ks 一 有 1 ~— kz *** —k: 一 天 Ip 
则 闭环 系统 动态 方程 了 式 (15. 12) 可 写成 回 量 形式 , 即 
e 一 人 e 十 中 wx” 一 wpr 0) (15- 14) 
定义 最 优 控制 参数 为 
6” 一 argminl sup | up(xX | OO)—u" || (15.15) 
Um ™™ 
i=1 
定义 最 小 通 近 误差 为 
Yo 一 Up 10 —u” (15.16) 
由 式 (15. 14) 可 得 误差 方程 为 
ee = Ae 二 [bilanpCr | 人 0) 一 xzp(r |10 一 中 pr | 的 | 一 2 (15. 17 
可 将 其 改写 为 
ee 一 人 Ae 十 有 (OO” — O08(r)— bw (15. 18 ) 


定义 Lyapunov 函数 为 


oo ee A (15. 19) 
2 2 
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式 中 ,参数 yy 是正 的 常数 ，。 
P 为 一 个 正定 矩阵 且 满 足 Lyapunov 方程 : 


全 十 PA 一 一 O (C15. 20) 
式 中 ,0 是 一 个 任意 的 nXnn 的 正定 矩阵; A 由 式 (15. 13) 给 出 。 
取 Vi = 于 erPe ,V， 一 二 070 一 0). 令 M= (0 一 0)ie(x)— bw, 则 
yy] 
式 (15. 18) 变 为 
e 一 Ae 十 AM 
yO Rl T、 | Ty 


时 SeTCATP 十 PA)e 十 FM"Pe 十 eT PM 


=— Fe'Qe + FM"Pe + eTPM) 


ev eTQe + eTPM 
即 
Re eTQe Ta 
ep 0 — 0T6 
V 的 导数 为 
二 eTQe epg = Tesy —]|— 0 — 0)T6 (15. 21) 
令 p, 为 P 的 最 后 一 列 , 由 5b 二 [0,0,0,…,b] 可知 ,e'Pb 二 e' pb , 则 式 (15. 21) 变 为 
V 一 一 了 erOe 十 0 一 DTILyeTPeCz) 一 0 一 eT 记 Dro (Ts 2) 
取 目 适应 律 ym 


0 = yeTpé (xz) (15. 23) 第 控 对 象 。 “| ci 


x =f(x)}tbhu, =x 


则 


WwW 一 一 二 2T e 一 -TP, bP: ' (15.24) 
2 ee Tbr 硕 疝 控制 吉 
i= ch S(7) 


Q 一 0,w 是 最 小 遂 近 误差 ,通过 设计 足够 
多 规则 的 模糊 系统 up (zx10) ,可 使 w 充分 小 ， 


1 初始 值 (0) | ” 自 适 应 律 
并 满足 |e psbw | 一 二 e"Q, 从 而 使 得 V0。 | 6=7eTp, Ex) 


自 适应 模糊 控制 系统 结构 框图 如 图 15-33 图 15-33 直接 自 适 应 模糊 控制 系统 结构 框图 
所 示 。 


15.4.4 直接 自 适 应 模糊 控制 仿真 


取 被 控 对 象 为 


区 一 一 25 工 十 133z7 


位 置 指 令 为 sin(xt)。 取 以 下 6 种 隶属 度 曙 数 : 


| 
活 应 律 取 式 (15. 23)。 取 Q 一 | |], 和 一 1,ks 一 10, 自 适应 参数 取 y= 50。 


1 
JN3 (Xi) 一 eg 
LN2 (Xi) 一 exp( 一 (zi 十 1.5)2) 
LN1(Xi) 一 EL 一 57 :| 
uP1 (Xi) 一 expl 一 (zi 一 0.5 ) |] 
Apz (Xi) 一 expl 一 (zi 一 1 S| 


Kp3 (Xi) 一 i 


20 
0 


根据 隶属 度 孙 数 , 编 写 MATLAB 程序 如 下 : 


千 直 接 自 适应 模糊 带 近 
cle 
clear all; 


close all; 


LD:T:L2;: 


figure(l] ); 
for i=1:1:6 
T= 


第 清 屏 
千 删除 workplace 变量 
多 美 掉 显示 图 形 窗 口 


名 模糊 集 变 化 范围 长 度 


当 模糊 集 变 化 范围 


u= 1./(1+ exp(5*x (x + 2))):; 


elseif i==6 


u= 1./lieapl -= 5*% (x- 2))); 


忆 ] Se 


u=expl— (x+2.5- (1-1)).°2); 


end 
hold on; 


plot(x,u, 'r', ‘LineWidth', 2 ).; 


end 


xlabel('x') ;ylabel(' 隶 属 度 函 数 模 糊 集 '); 


grid on 
axlis tight 


] + a i rp 
系统 初始 状态 矩阵 为 L1;,0」:0 中 各 元 双 的 初始 值 均 取 0。 采 用 控制 律 式 (15.19), 日 


J 1 


s49 革 
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运行 程序 ,输出 隶属 度 图 数 图 如 图 15-34 所 示 。 


隶属 函数 模糊 集 


图 15-34 隶属 度 函 数 图 


对 内 控 对 象 进行 直接 自 适应 控制 ,编写 MATLAB 程序 如 下 : 


先 S 一 function for continuous state equation 被 控 对 和合 


function [sys, x0, str,ts] =s function(t, x,u, flag) 


switch flag, 


Case 0, 
[svs, x0, str,ts] = mdlIinitializeSizes; 当初 始 化 函数 
Case 1, 
sys = mdlDerivatives(t, x,u):; 争 微 分 函数 
秆 输出 
CAaSe 3, 
sys = mdlOutputs(t, x,u); 向 输出 函数 


向 Unhancled flags 
case {2, 4, 9 |} 
sys = [|]; 
Unexpected flags 
otherwise 
error(['Unhandled flag = ',num2str(flag) ] ) ; 


end 


function [sys,x0, str,ts| = mdlInitializeSizes 


Sizes = Simsizes; 


sizes. NumContStates = 2; 
sizes. NumDiscStates = 0:; 
sizes. NumOutputs = 2; 守 和 个 输出 
sizes. NumInputs = 竺 1 个 输入 
sizes.DirFeedthrough = 0; 
sizes. NumSampleTimes = 0; 


sys = Simsizes(sizes); 
x0= [1 0]; 

str=||]; 

ts=[]; 


function sys = mdlDerivatives(t, x,u) 
和 二 阶 系 统 

sys(1) = x(2); 

sys(2) =— 25 x x(2)++133x u; 
function SYS = mdlOQutputs(t, x,u) 
sys(1) = x(1); 

sys(2) = x(2); 


画 [ 图 程序 编写 如 下 : 
close all:; 


figure(1); 

plot(t,y(: ,1), r,t,v(:,2),'b', LineWidth', 2); 
xlabel('time(s)');vylabel('Position tracking').; 
grid on 


title(' 位 置 跟踪 ') 


figure(2): 

plot{(t, vy(:,1) — vy(:,2), rr','LineWidth', 2); 
xlabel('time(s)');vlabell( 'Position tracking error'); 
grid on 


title(' 位 置 跟踪 误差 ') 


figure(3):; 

plot(t, uu(:,1),'r', 'LineWidth', 2); 
xlabel('time(s)');vylabel('Control input'); 
grid on 


title( ' 控 制 输 入 信号 ') 


运行 程序 ,结果 如 图 15-35 一 图 15-37 所 示 。 
位 置 距 足 


Position tracking 


| 
Ln 


一 1 .U 


s 6 7 8 9 10 
time(s) 


图 15-35 位置 跟踪 
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箱 中 党 


针对 模糊 推理 结构 进行 FIS 的 构建 以 及 属性 查看 和 运算 :通过 上 自 


S 
本 


基于 模糊 逻辑 运算 需 ' 本 章 从 隶属 度 图 数 出 发 ,讲解 了 了 MATLAB 模糊 工 


用 的 隶属 度 函 数 ,然后 


旗 独 全 面 而 系统 地 等 担 神 糊 多 和 辑 控制 大 的 应 用 。 


LE 


适应 模糊 控制 笑 的 设计 


最 优化 方法 就 是 专门 研究 如 何 从 多 个 方案 中 合理 地 提取 出 最 佳 
方案 的 科学 。 利 用 MATLAB 的 优化 工具 箱 , 可 以 求解 线性 规划 、 非 
线性 规划 和 多 目标 规划 问题 。 另 外 ,该 工具 箱 还 提供 了 线性 / 非 线性 
最 小 化 方程 求解 、 曲 线 拟 合 、 二 次 规划 等 问题 中 大 型 课题 的 求解 方 
法 ,为 优化 方法 在 工程 中 的 实际 应 用 提供 了 更 方便 、 快 捷 的 途径 。 

学 习 目标 : 


。 掌握 线性 规划 问题 求解 ; 

。 掌握 无 约束 非 线性 规划 问题 求解 ; 
。 掌握 二 次 规划 问题 求解 ; 

。 掌握 有 约束 最 小 化 问题 求解 ; 

。 掌握 目 标 规 划 问 题 求 解 ; 

。 掌握 最 大 最 小 化 问题 求解 。 


16.1 优化 工具 箱 及 最 优化 问题 简介 


在 生活 中 ,人 们 对 于 同一 个 问题 往往 会 提出 多 个 解决 方案 ,并 通 
过 各 方面 的 论证 从 中 提取 最 佳 方案 。 最 优化 方法 就 是 专门 研究 如 何 
从 多 个 方案 中 科学 合理 地 提取 出 最 佳 方案 的 方法 。 由 于 优化 问题 无 
所 不 在 ,目前 最 优化 方法 的 应 用 和 人 研究 已 经 深入 到 了 生产 和 科 人 饶 的 各 
个 领域 ,如 土木 工程 .机 械 工 程 , 化 学 工程 .运输 调度 ,生产 控制 ,经 济 
规划 .经济 汗 理 等 ,并 取得 了 显 肴 的 经 济 效 益 和 社会 效益 。 

用 最 优化 方法 解决 最 优化 问题 的 技术 称 为 最 优化 技术 ,人 它 包 含 两 
个 方面 的 内 容 。 
建立 数学 栋 型 , 即 用 数学 语言 来 揪 述 最 优化 问题 。 栋 型 中 的 
数学 关系 式 反 映 了 最 优化 问题 所 要 达到 的 目标 和 各 种 约束 条 件 。 

(2) 数学 求解 。 数 学 模型 建 好 以 后 ,选择 合理 的 最 优化 方法 进行 

下 面 介 绍 有 关 优 化 工具 箱 中 的 常用 哨 数 。 


第 
证 
优 
化 
工 
有 具 
箱 
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16.1.1 优化 工具 箱 笛 用 函数 


首先 介 绍 几 个 优化 工具 箱 的 稼 用 明 数 。 利 用 optimset 恩 数 :可 以 创建 和 编辑 参数 纺 
构 ; 利用 optimget 半数 ,可 以 获得 options 优化 参数 。 


]. optimset 函数 


optimset 因数 用 于 创建 或 编辑 优化 选项 参数 结构 。 

语法 如 下 : 

options = optimset('param]l', valuel, 'param2' value2，… ) 

optimset 

options = optimset 

options = optimset(optimfun) 

options = optimset(oldopts, 'paraml', valuel, -..) 

options = optimset(oldopts, newopts) 

摘 述 如 下 : 

(1) options 一 optimset(C'paraml'yvaluel, 'param2',value2，…*) 的 作用 是 创建 一 个 
名 为 options 的 优化 选项 参数 .其 中 指定 的 参数 具有 指定 值 。 所 有 未 指定 的 参数 都 设置 
为 空 矩 阵 中 (将 参数 设置 为 品 表 示 当 options 传递 给 优化 函数 时 给 参数 赋 默 认 值 )。 赋 值 
时 只 要 输入 参数 前 面 的 字母 就 可 以 了 。 

(2) optimset 图 数 没有 输入 /输出 变量 时 :将 显示 一 张 完整 的 带 有 有 效 值 的 参数 
列表 。 

《3) options 一 optimset 的 作用 是 创建 一 个 选项 结构 options ,其 中 所 有 的 元 素 被 设 
= 

(4) options 二 optimsetCoptimfun) 的 作用 是 创建 一 个 含有 所 有 参数 名 和 与 优化 函 
效 optimfun 相关 的 市 有 默认 值 的 选项 结构 options 。 

(5) options 一 optimset(Coldopts,'paraml'yvaluel，…) 的 作用 是 创建 一 个 oldopts 
的 备份 ,用 指定 的 数值 修改 参数 。 

(6) options 一 optimset(oldopts ,newopts) 的 作用 是 将 已 经 存在 的 选项 结构 oldopts 
与 新 的 选项 结构 newopts 进行 合并 。newopts 参数 中 的 所 有 元 素 将 覆盖 oldopts 参数 中 
的 所 有 对 应 元 素 。 


2. optimget 函数 


optimget 明 数 用 于 获取 优化 选项 参数 值 。 
语法 如 下 : 


val = optimget(options, 'param') 
val = optimget(options, 'param', default) 


描述 如 下 : 
(1) val 一 optimgetCoptions, 'param' 返回 指定 的 参数 param 的 值 。 


(2) val 一 optimeget(Coptions,'param'ydefault) 妈 回 指定 的 参数 param 的 值 ,如 果 该 
值 没 有 定义 ,; 则 返回 默认 值 。 

举例 如 下 。 

(1) 下 面 的 语句 创建 一 个 名 为 options 的 优化 选项 结构 ,其 中 显示 参数 设置 为 iter， 
TolFun 参数 设置 为 le 一 8， 


De 
优 
f 
[ 
内 
和 


options = optimset( ‘Display', 'iter', 'TolFun',le— 8) 


结果 显示 : 


options = 

Display: 'iter' 
MaxFunEvals: [| 
MaxIter: [| 

TolFun: 1.0000e— 008 

TolX: [| 
FunValCheck: [| 
OutputEcn: [|] 
PlotFcns: [|] 
ActiveConstrTol: [|] 
Algorithm: [|] 
AlwaysHonorConstraints: [| 
BranchStrategy: [|] 
DerivativeCheck: [| 
Diagnostics: [|] 
DiffMaxChange: [| 
DiffMinChange: [| 
FinDiffType: [] 
GoalsExactAchieve: [] 
GradConstr: [| 
GradObj: [|] 
HessFcn: [|] 
Hessian: [| 
HessMult: [| 
HessPattern: [| 
HessUpdate: [|] 
InitialHessType: [|] 
InitialHessMatrix: [| 
InitBarrierParam: [| 
InitTrustRegionRadius: [|] 
Jacobian: [| 
JacobMult: [|] 
JacobPattern: [1] 
LargeScale: [| 
LevenbergMarquardt: [] 
LineSearchType: [|] 
MaxNodes: [| 
MaxPCGIter: [| 


MATLAB 科 学 计算 


MaxProjCGIter: [|] 
MaxRLPIter: [| 
MaxSQPIter: [|] 

MaxTime: [| 
MeritFunction: [] 
MinAbsMax: [| 
NodeDisplayInterval: [|] 
NodeSearchStrategy: [| 
NonlEqnAlgorithm: [] 
NoStopIfFlatInfeas: [| 
ObjectiveLimit: [|] 
PhaseOneTotalScaling: [] 
Preconditioner: [|] 
PrecondBandWidth: [|] 
RelLineSrchBnd: [|] 
RelLineSrchBndDuration: [| 
ScaleProblem: [| 
Simplex: [| 
SubproblemAlgorithm: [|] 
TolCon: [] 

TolConSQP: [| 
TolGradCon: [|] 

TolPCG: [| 

TolProjCG: [] 
TolProjCGAbs: [|] 
TolRLPEun: [|] 
TolxXInteger: [|] 
TypicalX: [] 
UseParallel: [|] 


《2) 下 面 的 语句 创 建 一 个 名 为 options 的 优化 结构 的 备份 ,用 于 改变 TolX 参数 的 
值 ,将 新 值 保存 到 optnew 参数 中 。 


optnew = optimset(options, 'TolX',le— 4) 


(3) 下 面 的 语句 返回 options 优化 结构 ,其 中 包含 所 有 的 参数 名 和 与 fminbnd 果 数 相 
关 的 默认 值 。 


options = optimset( 'fminbnd').; 
(4) 若 只 希望 看 到 fminbnd 函数 的 默认 值 , 只 需要 简单 地 输入 下 面 的 语句 就 可 以 了 。 
optimset fminbnd 


optimset( 'fminbnd') 


(5) 可 以 使 用 下 面 的 命令 获取 TolX 参数 的 值 : 
Tol = optimget(options, 'TolX') 
得 到 : 
TolL=1.0000e 一 04 
下 面 列 出 有 关 最 优化 的 MATLAB 项 数 : 包 括 最 小 化 天 数 和 方程 求解 图 数 , 话 细 摘 
述 如 表 16-1 和 表 16-2 所 示 。 
表 16-1 最 小 化 函数 表 


[fgoalattain 多 目标 达到 问题 fminsearch , fminunc 无 约束 非 线 性 最 小 化 
| 有 边界 的 标量 非 线性 最 小 化 半 无 限 问题 

[minecon 有 约束 的 非 线 性 最 小 化 线性 课题 

(minimax 最 天 最 小 化 quadprog 二 次 课题 


表 16-2 方程 求解 函数 表 


solve 线性 方程 求解 
[solve 韭 线 性 方程 求解 
[zero 标量 非 线 性 方程 求解 


使 用 优化 工具 箱 时 ,由 于 优化 限 数 要 求 目 标 肾 数 和 约束 条 件 满足 一 定 的 格式 ,所 以 
需要 用 户 在 进行 模型 输入 时 注意 以 下 几 个 问题 : 

(1) 目标 申 数 最 小 化 。 优 化 图 数 fminbnd. fminsearch. fminunc, fmincon. fgoalattain、 
fminmax 和 lsqnonlin 郡 要 求 目 标明 数 最 小 化 :如 条 优化 问题 要 求 目标 果 数 最 大 化 ,可 以 
通过 使 该 目标 蚂 数 的 伍 什 最 小 化 ,; 即 一 了 f(z) 最 小 化 来 实现 。 类 似 地 ,对 于 quadprog 图 数 
提供 一 豆 和 一 {, 对 于 linprog 了 尔 数 提供 一 。 

《2) 约束 非 正 。 优 化 工具 箱 要 求 非 线 性 不 等 式 约束 的 形式 为 Ci(x) 三 0, 通过 对 不 等 
式 取 侧 可 以 达到 使 大 于 零 的 约束 形式 变 为 小 于 和 零 的 不 每 式 约束 形式 的 目的 。 例 如 ， 
Ci(z) 宇 0 形式 的 约束 每 价 于 一 Ci(z) 夺 0; Ci(x) 宇 6 形式 的 约束 等 价 于 一 Ci(zx) 十 5b 硅 0，。 


16.1.2 最 优化 问题 


求解 单 变 量 最 优化 问题 的 方法 有 很 多 种 ,根据 目标 蚂 数 是 否 需 要 求 导 可 以 分 为 两 
类 , 即 直 接 法 和 间接 法 。 直 接 法 不 需要 对 目标 盟 数 进行 求 导 ,而 间接 法 则 需要 用 到 目标 
轴 数 的 导数 。 


1. 直接 法 
常用 的 一 维 直接 法 主要 有 消去 法 和 近似 法 两 种 。 
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(1) 消去 法 。 该 法 利用 单 蜂 吗 数 具有 的 消去 性 质 进行 反复 近 代 ,了 逐渐 消去 不 包含 极 
小 点 的 区 间 ,缩小 搜索 区 间 ,直到 搜索 区 间 缩 小 到 给 定 的 人 允许 精度 为 止 。 一 种 典型 的 消 
去 法 为 黄金 分 割 法 (golden section search)。 黄 金 分 割 法 的 基本 思想 是 在 单 峰 区 间 内 适 
当 插 入 两 点 .将 区 间 分 为 3 段 ,然后 通过 比较 这 两 点 肾 数 值 的 大 小 来 确定 是 删 去 最 左 段 
还 是 最 右 段 ,或 同时 删 去 左右 两 段 保 留 中 间 段 。 重 复 该 过 程 使 区 间 无 限 缩小 。 插 入 点 的 
位 置 放 在 区 间 的 黄金 分 割 点 及 其 对 称 点 上 ,所 以 该 法 称 为 黄金 分 割 法 。 该 法 的 优点 是 算 

(2) 多 项 式 近 似 法 。 该 法 用 于 目标 限 数 比较 复活 的 情况 。 此 时 寻找 一 个 与 它 近 似 的 
师 数 代 竺 目标 果 数 ,并 用 近似 果 数 的 极 小 点 作为 原 图 数 极 小 点 的 近似 。 篆 用 的 近似 师 效 
为 二 次 和 三 次 多 项 式 。 


2。.。 间接 法 


间接 法 需要 计算 目标 也 数 的 导数 ,优点 是 计算 速度 很 快 。 常 见 的 间接 法 包括 牛顿 切 
线 法 .对 分 法 、 荐 线 法 和 三 次 插值 多 项 式 近 似 法 等 。 优 化 工具 箱 中 用 得 较 多 的 是 三 次 插 
值 法 。 

对 于 只 需要 计算 蚂 数 值 的 方法 ,二 次 插值 法 是 一 个 很 好 的 方法 , 它 的 收 剑 速度 较 快 ， 
尤其 在 极 小 点 所 在 区 间 较 小 时 更 是 如 此 。 黄 金 分 割 法 则 是 一 种 十 分 稳定 的 方法 ,并 且 计 
算 简 单 。 由 于 以 上 原因 ,MATLAB 优化 工具 箱 中 用 得 较 多 的 方法 是 二 次 插值 法 、 三 次 插 
值 法 ,二 次 ,三 次 混合 插值 法 和 黄金 分 割 法 。 

下 面 介 绍 有 关上 晒 数 。 

fminbnd: 功能 为 找到 固定 区 间 内 单 变 量 曙 数 的 最 小 值 。 

语法 如 下 : 


x = fminbnd(fun, xl ,x2) 
xX = fminbndl( fun, xl, x2,options) 
x = fminbnd(fun, x] ,x2,options,Pl,P2, ...) 


[x, fval|] = fminbnd( … ) 

[x, fval, exitflag] = fminbnd( … ) 

[x, fval, exitflag, output] = fminbnd( .… ) 

描述 如 下 : 

(1) xx 一 fminbndCfun,xl,x2) 返 回 区 间 (Cziyzrz) 上 fuan 和 参数 描述 的 标量 图 数 的 最 小 
伍 天 。 

(2) x 二 fminbnd(fun,xl,x2,options) 用 options 参数 指定 的 优化 参数 进行 最 小 化 。 

(3) x 一 fminbnd(Cfun,xl,x2,options,P1,P2， …) 提 供 另外 的 参数 Pi、P; 等 ,传输 
给 目标 晒 数 fun。 如 果 没 有 设置 options 选项 , 则 令 options 王 | |]。 

(4) [x,fval| 二 fminbnd(C…) 人 返回 解 z 人 钼 目标 肾 数 的 值 。 

(5) [x,fval, exittflag | 二 fminbnd(…) 返 回 exitflag 值 描 述 fminbnd 图 数 的 退出 
条 件 。 

(6) [x,fval,exitflag,outputj 一 fminbnd(…) 返 回 包 含 优 化 信息 的 结构 输出 。 

与 fminbnd 阴 数 相关 的 细 广 内容 包 含 在 fun、options、exitflag 和 output 等 参数 中 ， 


如 表 16-3 所 示 。 
优 

表 16-3 参数 描述 化 

[ 

参数 描 述 具 


需要 最 小 化 的 目标 函数 。fun 函数 需要 输入 标量 和 参数 x, 返 回 x 处 的 目标 函数 标量 值 {。 
可 以 将 fun 函数 指定 为 命令 行 , 如 : 


x = fminbnd( inline( 'sin(x * x)'),x0) 


pan 同样 ,fun 参数 可 以 是 一 个 包含 函数 名 的 字符 串 。 对 应 的 函数 可 以 是 M 文件 .内 部 函数 
或 MEX 文件。 车 fun 二 "myfun', 则 M 文件 函数 myfun. m 必须 是 下 面 的 形式 : 
function f = myfunl(x) 
EE 王 as 


优化 参数 选项 。 可 以 用 optimset 函数 设置 或 改变 这 些 和 参数 的 值 。options 参数 介绍 如 下 。 
(1) Display: 显示 的 内 容 。 选 择 off, 不 显示 输出 ; 选择 iter, 显示 每 一 步 夫 代 过 程 的 输 
出 ; 选择 final, 显示 最 终结 果 。 

(2) MaxFunEvals， 图 数 评 价 的 最 大 人 多 许 次 数 。 

(3) MaxIter: 最 大 允许 进 代 次 数 。 

(4) TolX: 工 处 的 终止 容 限 

(1) 二 0: 表示 目标 图 数 收 伍 于 解 工 处 。 

(2) 一 0: 表示 已 经 达到 函数 评价 或 迭代 的 最 大 次 数 。 

(3) 一 0: 表示 目标 图 数 不 收 伍 

该 参数 包 人 会 的 优化 信息 如 下 。 

(1) output. iterations: 渤 代 次 数 。 

(2) output. algorithm: 所 采用 的 算法 。 

(3) output. funcCount: 畏 数 评价 次 数 


options 


exit{flag 


output 


下 面 举 几 个 求 最 小 化 问题 的 示例 。 
【 例 16-1】 在 区 间 (0.3x) 上 求 滑 数 cos(x) 的 最 小 值 。 


ll 


fminbnd((@cos,0,3 * pi) 


3. 1416 


Cos(x) 


所 以 区 间 (0,3x) 上 了 消 数 cos(Cz) 的 最 小 值 点 位 于 z 一 3. 1416 处 。 
最 小 值 处 的 图 数值 为 : 
一 1 


【 例 16-2〗】 对 边 长 为 3m 的 正方 形 铁 板 ,在 4 个 角 人 处 竟 去 相等 的 正方 形 以 制 成 方形 
无 新 水 模 , 问 如 何 六 才能 使 水 村 的 容积 最 大 ? 
现在 要 求 在 区 则 (0,1.5) 上 确定 一 个 ,使 容积 最 大 化 。 因 为 优化 工具 箱 中 要 求 目 
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标 轴 数 最 小 化 ,所 以 需要 对 目标 阴 数 进行 转换 , 即 要 求 最 小 化 ，。 
首先 编写 M 文件 ex16_2. mi: 


functionf = opt] (x) 
f= (3-—-2% XX)."*2 % XX; 


然后 调用 fminbnd 肯 数 : 


x = fminbnd((@ex16 2,0,1.5) 


得 到 问题 的 解 : 


DO. S5000 
即 前 掉 的 正方 形 的 边 长 为 0. 5m 时 水 槽 的 容积 最 大 。 
16.2 线性 规划 


线性 规划 是 人 处理 线性 目标 函数 和 线性 约束 的 一 种 较为 成 出 的 方法 ,目前 已 经 广泛 应 
用 于 军事 ,经济 、 工 业 、 农 业 、 教 育 、 商 业 和 社会 科学 等 许多 方面 。 

线性 规划 的 标准 形式 要 求 目 标清 数 最 小 化 .约束 条 件 取 等 式 、 变 量 非 人 负 。 不 符合 条 
件 的 线性 模型 要 首先 转化 成 标准 形 . 

线性 规划 的 求解 方法 主要 是 单纯 形 法 (simple method) ,该 法 由 Dantzig 于 1947 年 提 
出 ,后 经 多 次 改进 。 单 纯 形 法 是 一 种 迭代 算法 , 它 从 所 有 基本 可 行 解 的 一 个 较 小 部 分 通 
过 迭代 过 程 选 出 最 优 解 。 其 迭代 过 程 的 一 般 拉 述 如 下 : 

(1) 将 线性 规划 问题 化 为 典范 形式 ,从 而 可 以 得 到 一 个 初始 基本 可 行 解 xz” (初始 顶 
点 ) ,将 它 作 为 迭代 过 程 的 出 发 点 ,其 目标 值 为 z=(x" )， 

(2) 寻找 一 个 基本 可 行 解 zx ,使 xz(x"") 夺 xz(z”)。 方 法 是 通过 消去 法 将 产生 < ” 
的 典范 形式 化 为 产生 z “的 典范 形式 。 

(3) 继续 寻找 较 好 的 基本 可 行 解 二 ,z ,… ,使 目标 孔 数 值 不 断 改 进 , 即 z(x% ) 二 
z(Xx" ) 宇 z(T" ) 宇 …。 当 某 个 基本 可 行 解 骨 也 不 能 被 其 他 基本 可 行 解 改进 时 , 它 就 是 所 
求 的 最 优 解 。 

MATLAB 优化 工具 箱 中 采用 的 是 投影 法 , 它 是 单纯 形 法 的 一 种 变种 。 

下 面 介 绍 有 关 贞 数 。 


16.2.1 线性 规划 函数 


1. 功能 


求解 线性 规划 问题 。 


CS 


语法 


= 1inprog( 王 Rb, Redq, bedq) 

= linprog(f,AM,b,Aeq, beq lb ub) 

= linprog(f,A,b,Meq,beq, 1b,ub,x0) 

x = linprog(f,A,b,Aeq,beqg, lb,ub,x0,options) 
[x, Eval] = linprog( … ) 

[x, fval, exitflag| = linprog( … ) 


站 网 国 


[x, fval, exitflag,output] = linprog( … ) 
[x, fval, exitflag, output, lambda| = linprog( …) 


3. 描述 


(1) xx 一 linprog(f,A,b): 求解 问题 min Fx, 约束 条 件 为 Ar 三 b， 

(2) x 二 linprog(f,AA,b,Aegq,beq): 求解 上 面 的 问题 ,但 增加 等 式 约 束 , 即 Aeqz 二 
beq。 车 没有 不 等 式 存 在 , 则 令 A 二 [ .6 二 [Lj。 

(3) x 二 linprog({,A,b,Aeq,begqg,lb,ub);: 定义 设计 变量 z 的 下 界 lb 和 上 蚤 ub, 鸽 
得 x 始终 在 该 范围 内 。 硅 没有 等 式 约束 , 令 Aeq 王 [jbeq 一 [L。 

(4) x 二 linprog({f,A,b,Aeqg,beg,lb,ub,x0):; 设置 初 值 为 ze。 该 选项 只 适用 于 中 
型 问题 ,默认 大 型 算法 将 忽略 初 值 。 

(5) x 二 linprog(f,A,b,Aeqg,beg,lb,ub,x0,options): 用 options 指定 的 优化 参数 
进行 最 小 化 。 

(6) [x,fval|] 二 linprog(…): 返回 解 xz 人 外 的 目标 也 数值 fval。 

(7) [x,lambda,exitflag | 二 linprog(…): 返回 exitflag 值 , 描 述 图 数 计算 的 退出 
条 件 。 

(8) [x,lambda.,exitflag, output | 一 linprog(…): 返回 包含 优化 信息 的 输出 变量 
DuUtpPput 。 

(9) | xfval,exitflag,output,lambda | 一 linprog(…): 将 解 工 处 的 拉 格 明日 鞭 子 返 
回 到 lambda 参数 中 。 


4. 变量 


lambda 参数 是 解 x 人 钼 的 拉 格 天 日 乘 子 , 它 的 属性 如 下 。 
(1) lambda. lower: lambda 的 下 界 。 

(2) lambda. upper: lambda 的 上 界 。 

(3) lambda. ineqlin: lambda 的 线性 不 等 式 。 

(4) lambda. eqlin: lambda 的 线性 等 式 。 


5. 算法 


(1) 大 型 优化 算法 : 采用 LIPSOL 法 ,该 法 在 进行 迭代 计算 之 前 首先 要 进行 一 系列 
上 的 预 处 理 。 
(2) 中 型 优化 算法 : linprog 因数 使 用 的 是 投影 法 ,就 像 quadprog 困 数 的 算法 一 样 。 


= 


生 


一 部 和 一 
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linprog 图 数 使 用 的 是 一 种 活动 集 方法 ,是 线性 规划 中 单纯 形 法 的 变种 , 它 通 过 求解 男 一 
个 线性 规划 问题 来 找到 初始 可 行 解 。 

6. 诊断 

大 型 优化 问题 算法 的 第 一 步 涉及 一 些 约束 条 件 的 预 处 理 问题 ,有 些 问 题 可 能 导致 
linprog 图 数 退 出 ,并 显示 不 可 行 的 信息 。 

若 Aeq 和 参数 中 某 行 的 所 有 元 素 都 为 零 , 但 beq 参数 中 对 应 的 元 素 不 为 零 , 则 给 出 如 
下 退出 信息 : 


Exiting due to infeasibility: an all zero row in 七 he constraint matrix does not have a zero In 
corresponding right hand size entry. 


若 工 的 某 一 个 元 素 没 在 界 内 ,; 则 给 出 以 下 退出 信息 : 


Exiting due to infeasibility:objective f' x x is unbounded below. 


若 Aeq 和 参数 的 某 一 行 中 只 有 一 个 非 零 值 , 则 xz 中 的 相关 值 称 为 奇异 变量 。 这 里 ,x 
中 该 成 分 的 值 可 以 用 Aeq 和 beq 算得 。 硅 算得 的 值 与 男 一 个 约束 条 件 相 牙 盾 ; 则 给 出 如 
下 退出 信息 : 


Exiting due to infeasibility:Singleton variables In equality constraints are not feasible. 


若 奇 异 变 量 可 以 求解 ,但 其 解 超出 上 界 或 下 界 , 则 给 出 如 下 退出 信息 : 


Exiting due to infeasibility:singleton variables in the equality constraints are not within 
bounds. 


16.2.2 线性 规划 问题 的 应 用 


1. 生产 决策 问题 


【 例 16-3】 菏 厂 生产 甲乙 两 种 产品 ,已 知 制 成 1t 产品 甲 需 用 资源 A 4t, 资 源 B 
4m ; 人 制 成 lt 产品 乙 需 用 人 质 源 A lt 资源 B 6m ,资源 C7 个 单位 。 夺 1t 产 辣 甲 和 乙 的 经 
济 价值 分 别 为 8 万 元 和 5 万 元 ,3 种 资源 的 限制 量 分 别 为 90t\220m” 和 240 个 单位 , 试 分 
析 应 生产 这 两 种 产品 各 多 少 吨 才能 使 创造 的 总 经 济 价值 最 高 ? 

这 里 可 以 令 生产 产品 甲 的 数量 为 zi, 生产 产品 乙 的 数量 为 ze。 根据 题 意 , 代 码 设 置 
如 下 : 

lc 


Clear 
f= [|-8;-5]; 


及 =[41 

DO 了 |]:; Tr 
b= [90; 220; 240]; 内 
lb = zeros(2,1):; 入 


然后 调用 linprog 函数 : 


[x, fval, exitflag, output, lambda|] = linprog(f,A,b,[ 1],[]1,1b) 


最 优化 结果 如 下 : 
Optimization terminated. 


下 二 
16.0000 
26.0000 


fwal = 
一 258.0000 


exitflag = 
LL 


Output = 
iterations: 5 
algorithm: 'interior — point 一 legacy' 
cgqiterations: 0 
message: 'Optimization terminated.' 
constrviolation: 0 
firstorderopt: 1.9099e— 12 


lambda = 
ineqlin: [3xl doublel| 
eqlin: [0xl doublel| 
upper: [2xl1 doublel| 
lower: [2xl double| 


由 上 可 知 ,生产 甲 种 产品 16t\ 乙 种 产品 26t 可 使 创造 的 总 经 济 价值 最 高 ,最 高 经 济 价 
值 为 258 万 元 。exitflag 一 1 表示 过 程 正常 收敛 于 解 工 处 。 
2. 工作 人 员 计 划 安 排 问题 


【 例 16-4】 某 昼夜 服务 的 公共 交通 系统 每 天 各 时 间 段 (每 4h 为 一 个 时 间 段 ) 所 需 的 
值班 人 数 如 表 16-4 所 示 ,这 些 值班 人 员 在 某 一 时 段 开 始 上 班 后 要 连续 工作 8h( 包 括 轮 流 
用 餐 时 间 ) , 问 该 公共 交通 系统 至 少 需要 多 少 名 工作 人 员 才 能 满足 值班 的 需要 ? 
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表 16-4 各 时 段 所 需 值 班 人 数 


] D:00 一 10:00 

2 10:00 一 14:00 
3 1]4:00~— 18:00 
4 


2 22:00 一 2:00 


这 里 可 以 设 xz; 为 第 i 个 时 段 开 始 上 班 的 人 员 数 。 
根据 题 意 , 代 人 但 设置 如 下 : 


le 

Clear 

to [Li tL L111) 

A=[-10000 一 工 
一 一 IO0o0DD 
DO-1 -1000 
DUO 一 -i00 
0000 5-1 -10 
DOO00 一 工 一 工 |; 

B=| = 60. = 20: —80: — 50-—50:— 301-: 

lb = zeros(6,1); 


然后 调用 linprog 蝴 数 : 


[x, fval, exitflag,output, lamnbda|] = linprog(f,A,b,[ |],[|,1b) 


最 优化 结 采 如 下 : 


Optimization terminated. 
到 二 

27.0553 

32.5220 

47.4780 

26.2604 

23.7396 

32.9447 


fval = 
190.0000 


exitflag = 
1 


output = 


iterations: 5 


CE 
| 

algorithm: 'interior — point — legacy' 
a 优 
cglteratlions: 0 化 
message: 'Optimization terminated.' 厂 
constrviolation: 0 
1 


firstorderopt: 2.4426e 一 09 


ineqlin: [6xl doublel 
eqlin: [0Oxl doublel] 
upper: [6xl doublel| 
lower: [6xl1 doublel 


可 见 , 只 要 6 个 时 段 分 别 安 排 27 人 、33 人 、47 人、26 人 、24 人 和 33 人 就 可 以 满足 值 
焉 的 需要 。 共 计 190 人 。 并 且 计 算 结 果 exitflag 一 1 是 收敛 的 。 
3. 投资 问题 


【 例 16-5〗 某 单 位 有 一 批 资金 用 于 4 个 工程 项 目的 投资 ,用 于 各 工程 项 目 时 所 得 的 
兆 收 益 ( 投 入 资金 的 百分比 ) 如 表 16-5 所 示 。 


表 16-5 工程 项 目 收益 


工程 项 目 D 
收益 (0 ) 11 


由 于 菏 种 原因 ,决定 用 于 项 目 A 的 投资 不 大 于 其 他 各 项 投资 之 和 ; 而 用 于 项 目 BB 和 
C 的 投资 要 大 于 项 目 D 的 投资 。 试 确定 使 该 单位 收益 最 大 的 投资 分 配方 案 。 

这 里 可 以 用 zi .zz 、zs 和 zz 分 别 代 表 用 于 项 目 A、BC 和 DD 的 投资 百分数 ,由 于 各 项 
目的 投资 百分数 之 和 必须 等 于 100%, 所 以 


= 1 | = | he 


让 
| 
Fl 


根据 题 意 , 代 人 码 设 置 如 下 : 


clear all 
cle 
EE= [=0.2;=0.08;—0.1;—=0.11]; 
A= [1=1—-1—=1 
加 二 了 一 下 
| 
Aeq=[1111]; 
beq= [1]; 
lb = zeros(4,1):; 


然后 调用 linprog 图 效 : 


[x, fval, exitflag,output, lambda| = linprog(f,A,b, ARAedqv beq, 1b) 


ks 


Lm 
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结果 如 下 : 


Optimization terminated. 


本 3 
0.5000 
0.0000 
0.2500 
0.2500 
fwal = 
一 由 .1525 
exitflag = 
1 
Output = 
iterations: 9 
algorithm: 'interior — point — legacy' 
cgiterations: 0 
message: 'Optimization terminated.' 
constrviolation: 2.2204e—16 
firstorderopt: 8.4705e 一 14 
lambda = 


ineqlin: [2xl doublel 
eqlin: 0.1525 
upper: [4xl1 doublel] 
lower: [4xl1 doublel 


上 面 的 结果 说 明 , 项 目 A、B、.C.D 投 入 资金 的 百分比 分 别 为 50%、0%% 、25、25%% 时 ， 
该 单位 收益 最 大 。 
4，、 工 件 加 工 任 务 分 配 问 题 
【 例 16-6】 某 车 间 有 两 台 机 床 甲 和 乙 .可 用 于 加 工 3 种 工件 。 假 定 这 两 台 机 床 的 可 
用 台 时 数 分 别 为 700 和 800,3 种 工件 的 数量 分 别 为 500、400 和 700, 且 ete ?不 同 
机 床 加 工 单位 数量 的 不 同 工 件 所 需 的 台 时 数 和 加 工 费 用 (如 表 16-6 所 示 ); 问 怎样 分 配 机 
床 的 加 工 任务 ,才能 既 满 足 加 工 工 件 . 要 求 ,又 使 总 加 工 费 用 最 低 ? 


表 16-6 机 床 加 工 情 况 


单位 工作 所 需 加 工人 台 时 数 单位 工件 的 加 工 费 用 


这 里 可 以 设 在 甲 机 床上 加 工 工件 1.2 和 3 的 数量 分 别 为 zi、 zz 和 za: 在 乙 机 床上 加 


工 工件 1.2 和 3 的 数量 分 别 为 x zs 和 zs。 根据 3 种 工种 的 数量 限制 , 则 有 : 人 
zi 十 Xs 一 500 (对 工件 1) 攻 
zz 十 zs 一 400 (对 工件 2) 入 
zs 十 xs 一 700 (对 工件 3) 


根据 题 意 ,代码 设置 如 下 : 


1 
忆 ] ear 
£f = [12:8;10;13;12;9]: 


A= [0.51.11.2000 
0000.51.3 1.2]; 
b = [700; 800]:; 


Aeq=[100100 
O10010 
O01001]; 

beq=[500 400 700]; 

lb = zeros(6,1):;: 


然后 调用 linprog 图 效 : 


[x, fval, exitflag, output, lambda|] = linprog(f,A,b, Aeq, beq,1b) 


结 来 如 下 : 


D0. 131.3 
400.0004 
229.87133 
A499 .8686 

0.0000 
470.1039 


fvyal = 
1.6230e+ 04 


eXxitflag = 
二 


Output = 
iterations: 8 
algorithm: 'interior ~— point — legacy' 
cgiliterations: 0 
message: 'Exiting: One or more of the residuals, duality gap, or total relative 
IIEOE .… ' 
constrviolation: 15.9142 
firstorderopt: 3.9993e+19 


567 置 | 
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Jambda = 
ineqlin: [2xl doublel 
eqlin: [3xl double| 
upper: [6xl1 double| 
lower: [6xl doublej 


可 见 ,在 甲 机 床上 加 工 400 个 工件 2、230 个 工件 3, 在 乙 机 床上 加 工 500 个 工件 1 、 加 
工 470 个 工件 3, 可 在 满足 条 件 的 情况 下 使 总 加 工 费 用 最 小 。 最 小 费用 为 16230 元 。 收 
敛 正常 。 


5. 确定 职工 编制 问题 


【 例 16-7】 某 工厂 每 日 8h 的 产量 不 低 于 3600 件 。 为 了 进行 质量 控制 ,计划 聘请 两 
个 不 同 水 平 的 检验 员 。 一 级 检验 员 的 速度 为 40 件 /h, 正 确 率 98% ,计时 工资 5 元 /hi; 二 
级 检验 员 的 速度 为 36 件 /h, 正 确 率 95%, 计 时 工资 3 元 /h。 检验 员 每 错 检 一 次 ,工厂 要 
损失 2 元 。 现 有 可 供 厂 方 聘请 的 检验 员 人 数 为 一 级 8 人 和 二 级 9 人 。 为 使 总 检验 费用 最 
省 ,该 工厂 应 聘 一 级 、 二 级 检验 员 各 多 少 名 ? 

可 以 设 需要 一 级 和 二 级 检验 员 的 人 数 分 别 为 名 和 zs 名 。 由 题 意 ,代码 设置 如 下 : 


Clc 

clear 

£f = [40;36|]; 
' A=[10 
| 01 
= 
: b= [8;9; - 45]; 
| lb = zeros(2,1); 


然后 调用 linprog 荫 数 ， 


[x, fval, exitflag,output, lambda| = linprog(f,A,b,[ ],|[ |,1b) 


结果 如 下 : 


Optimization terminated. 
了 时 = 

8. 0000 

1.6667 


| fval = 
380.0000 
exitflag = 

| 1 


output = 


iterations: 7 


algorithm: 'interior 一 Dont 一 legacy' 
cgiterations: 0 
message: 'Optimization terminated.' 
constrviolation: 0 
firstorderopt: 2.8528e—11 


lambda = 
ineqlin: [3xl doublel| 
eqlin: [0xl1 doublel| 
upper: [2xl1 doublel| 
lower: [2xl1 double | 


可 见 ,招聘 一 级 检验 员 8 名 、 二 级 检验 员 2 名 可 使 电 检 验 惨 用 最 省 , 约 为 380. 00 元 。 
计算 收敛 。 


6. 生产 计划 的 最 优化 问题 


【 例 16-8】 了 条 工厂 生产 A 和 B 两 种 产品 ,它们 需要 经 过 3 种 设备 的 加 工 , 其 工时 如 
表 16-7 所 示 。 设 备 一 、 二 和 三 每 天 可 使 用 的 时 间 分 别 不 超过 11h.、9h 和 12h。 产 品 A 和 
B 的 利润 随 市 场 的 需求 有 所 波动 ,如 果 预 测 未 来 菏 个 时 期 内 A 和 B 的 利润 分 别 为 5000 
元 / 吨 和 3000 元 / 吨 , 问 在 那个 时 期 内 ,每 天 应 生产 产品 A、B 各 多 少 吨 , 才 能 使 工厂 获 利 
最 大 ? 


表 16-7 生产 产品 工时 
天 品 设 备 一 设 备 二 设 


备 
B/( 小 时 / 吨 ) 3 3 
设备 每 天 最 多 可 工作 时 数 /h | 1 | 9 12 


va 这 里 BJ 以 设 每 天 应 安排 生产 产品 A 可 B 分 别 为 工 1[ 号 和 Zz 吨 。 
由 题 意 ,代码 设置 如 下 : 


Clc 
Clear 
es We 
A=[43 

5 4 

S31 
b=|[11;9;12|: 
lb = zeros(2,1):; 


然后 调用 linprog 阴 数 : 


[XxX, fval, exitflag,output, lambda| = linprog(lf,A,b,[ 1,[|,1b) 
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结果 如 下 : 


Optimization terminated. 
到 二 
1.8000 
0.0000 
fval = 
一 3.0000 
exitflag = 
1 
output = 
iterations: 6 
algorithm: " Large 一 scale: interior point' 
cgiterations: 0 
message: 'Optimization terminated.' 
constrviolation: 0 
firstorderopt: 8.2385e 一 009 
lambda = 
ineqlin: [3xl doublel 
eqlin: [0xl1 doublel 
upper: [2xl double | 
lower: [2xl1 doublel 


所 以 ,每 天 生产 A 产品 1.80 吨 、B 产品 0 吨 可 使 工厂 获得 最 大 利润 9000 元 。 
16.3 无 约束 非 线 性 规划 


无 约束 最 优化 问题 在 实际 应 用 中 也 比较 第 见 , 如 工程 中 第 见 的 参数 反 演 问题 。 帮 
外 :许多 有 约束 最 优化 问题 可 以 转换 为 无 约束 最 优化 问题 进行 求解 。 
下 面 介 绍 有 关 无 约束 非 线 性 规划 问题 的 基本 数学 原理 。 


16.3.1 基本 数学 原理 商 介 


求解 无 约束 最 优化 问题 的 方法 主要 有 两 类 , 即 直 接 搜 索 法 (Csearch method) 和 梯度 法 
(gradient method). 

直接 搜索 法 适用 于 目标 晒 数 高 度 非 线性 、 没有 导数 或 导数 很 难 计 算 的 情况 。 由 于 实 
际 工 程 中 很 多 问题 和 都 是 非 线性 的 ,直接 搜索 法 不 失 为 一 种 有 效 的 解决 办 法 。 篆 用 的 直接 
搜索 法 为 单纯 形 法 ,此 外 还 有 Hooke-Jeeves 搜索 法 ,Pavell 共 恩 方向 法 等 。 

在 图 数 的 导数 可 求 的 情况 下 .梯度 法 是 一 种 更 优 的 方法 :该 法 利用 图 数 的 梯度 (一 阶 
导数 ) 和 Hessian 算 阵 ( 二 了 导 数 ) 构 造 算 法 :可 以 获得 更 快 的 收 伍 速度 。 力 数 f(x) 的 全 
梯度 方 回 一 VFCz) 反 映 了 了 上 力 数 的 最 大 下 降 方 回 。 当 搜索 方向 取 为 负 樟 度 方 回 时 称 为 最 
速 下 降 法 。 篆 见 的 樟 度 法 有 最 速 下 降 法 .牛顿 法 、Marquart 法 、 共 恩 梯度 法 和 拟 牛 瑟 

在 有 所 有 这 些 方法 中 ,用 得 最 多 的 是 拟 牛 顿 法 ,这 个 方法 在 每 次 迭代 过 程 中 建立 曲率 


信息 ,构成 二 次 模型 问题 。 

下 面 介 绍 有 关 MATLAB 优化 工具 箱 中 的 求解 无 约束 最 优化 问题 算法 。 
法 ,该 算法 是 基于 内 部 映 山 牛顿 法 的 子 空间 和 置信 域 法 。 计 算 中 的 每 一 次 迭代 涉及 用 PCG 
法 求解 大 型 线性 系统 得 到 的 近似 解 。 

C2) 中 型 优化 算法 : fminunc 函数 的 参数 options. LargeScale 设置 为 of{f。 该 算法 采 
用 的 是 基于 二 次 和 三 次 混合 插值 一 维 搜索 法 的 BFGS 拟 牛 顿 法 。 但 一 般 不 建议 使 用 最 
速 下 降 法 。 

(3) 默认 时 的 一 维 搜 索 算 法 : 当 options. LineSearchType 设置 为 quadcubic 时 ,将 采 
用 二 次 和 三 次 混合 插值 法 。 将 options. LineSearchType 设置 为 cubicpoly 时 ,将 采用 三 
次 插值 法 。 第 二 种 方法 需要 的 目标 函数 计算 次 数 更 少 , 但 梯度 的 计算 次 数 更 多 。 这 样 ， 
如 于 提供 了 樟 度 信息 ,或 者 能 较 容 易 地 算得 , 则 三 次 插值 法 是 更 好 的 选择 。 

上 述 涉 及 的 算法 局 限 性 主要 表现 在 以 下 4 个 方面 : 

(1) 目标 函数 必须 是 连续 的 。fminunc 函数 有 时 会 给 出 局 部 最 优 解 。 
盟 数 只 对 实数 进行 优化 :, 即 工 必 须 为 实数 ,而 且 f(z 必须 返回 实数 。 
当 工 为 复数 时 ,必须 将 它 分 解 为 实 部 和 虚 音 

(3) 在 使 用 大 型 算法 时 ,用 户 必 须 在 fun 果 数 中 提供 梯度 Coptions 参数 中 GradOpbj 
属性 必须 设置 为 om)， 

(4) 目前 ,在 在 fun 哺 数 中 提供 了 解析 梯度 , 则 options 参数 DerivativeCheck 不 能 用 
于 大 型 算法 以 比较 解析 梯度 和 有 限 差 分 梯度 。 通 过 将 options 参数 的 Maxlter 属性 设置 
为 0 来 用 中 型 方法 核对 导数 ,然后 重新 用 大 型 方法 求解 问题 。 


(2) fminunc 


16.3.2 无 约束 非 线 性 规划 函数 
]. fminunc 函数 


1) 功能 
求 多 变量 无 约束 函数 的 最 小 值 。 
2) 语法 


= fminunc( fun, x0) 

x = fminunc(fun,x0,options) 

xX = fminunc(fun,x0,options,Pl,P2, -) 

[x, fvall] = fminunct( … ) 

[x, fval, exitflag|] = fminunc( … ) 

[x, fval, exitflag, output] = fminunc( … ) 

[x, fval, exitflag, output,grad| = fminunc( … ) 


[ xX, fval, exitflag, output, grad, hessian| = fminunc( … ) 
fminunc 给 定 初 值 , 求 多 变量 标量 滑 数 的 最 小 值 , 第 用 于 无 约束 非 线 性 最 优化 问题 ，。 
(1) x 一 fminunc(fun,;x0);: 给 定 初 值 xo; 求 fun 函数 的 局 部 极 小 点 工 。z 可 以 是 标 
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量 、 回 量 或 算 阵 。 

(2) x 一 fminuncCfuny,x0:options) : 用 options 参数 中 指定 的 优化 参数 进行 最 小 化 。 

(3) x 二 fminuncCfun,x0,options,P1,P2,，…): 将 问题 参数 Pl 、P; 等 百 接 输 给 目标 
了 商 数 fun, 将 options 参数 设置 为 空 矩 阵 , 作 为 options 参数 的 默认 值 。 

《4) [x,fval] 二 fminunc(…): 将 解 工 处 目标 图 煞 的 值 运 回 到 fval 参数 中 。 

(5) [x,fval,exitflag | 一 fminunc(…): 返回 | 值 ,描述 子 数 的 输出 条 件 。 

(6) [x,fval,exitflag, output | = fminunc(… 返回 包含 优化 信息 的 结构 输出 

(7) [x,fval,exitflag ,output,grad | = rnin hinet-..) : 将 解 工 处 fun 函数 的 梯度 值 返 
回 到 grad 参 效 中 。 

(8) | x,fval,exitflag,outputygrad,hessian | 一 fminunc(… )， 将 解 工 处 目标 图 数 的 
Hessian 和 矩阵 信息 返回 到 hessian 参数 中 。 

4) 变量 

输入 /输出 变量 的 摘 述 如 表 16-8 所 未 。 

表 16-8 输入 /输出 变量 描述 


日 标 函 数 。 需 要 最 小 化 的 目标 函数 。fun 函数 需要 输入 标量 参数 x 工 , 返 回 z 处 的 目标 函 
数 标 量 值 fF。 可 以 将 fun 贤 数 指定 为 命令 行 , 例 如 ， 
x = fminunc(inline('sin(x* xXx) '),xO0O) 
同样 ,fun 函数 可 以 是 一 个 包含 函数 名 的 字符 串 。 对 应 的 函数 可 以 是 M 文件 .内 部 函数 
或 MEX 文件 。 若 fun 一 'myfun', 则 M 文件 函数 myfun. m 必须 有 下 面 的 形式 : 
function f = myfunl(x) 
下 
若 fun 图 数 的 梯度 可 以 算得 ,上 且 options. GradObj 设 为 on， 
options = optimset( 'GradObj', "on ') 
Ee ee fun ts 回 解 xz pe sh lig 2 0 0 河 ee fun i 


对 nargout 值 来 避免 计算 榜 值 . 


function [fjg] = myfun(x) 


f= ; 计算 x 处 的 函数 什 

1f nargout > 1 ; 调用 fun 函数 并 要 求 有 两 个 输出 变量 
‘es ; 计算 x 处 的 梯度 值 

end 


\ 若 Hessian 矩阵 也 可 以 求 得 ,并 且 options. Hessian 设 为 on; 即 
options = optimset( 'Hessian', 'on') 
则 fun 函数 必须 返回 解 z 处 的 Hessian 对 称 和 矩阵 H 到 第 3 个 输出 变量 中 去 。 当 被 调用 的 


fun 函数 只 需要 一 个 或 两 个 输出 变量 时 (如 算法 只 需要 目标 函数 的 值 f 和 梯度 值 g 而 不 
需要 Hessian 矩阵 百 时 ), 可 以 通过 核对 nargout 的 值 来 避免 计算 Hessian 算 阵 


| 
LU 


options 


exit{flag 


output 


优化 参数 选项 。 可 以 通过 optimset 图 数 设 置 或 改变 这 些 参 数 。 其 中 有 的 参数 适用 于 所 
有 的 优化 算法 ,有 的 则 只 适用 于 大 型 优化 问题 ,另外 一 些 则 只 适用 于 中 型 问题 。 

首先 描述 适用 于 天 型 问题 的 选项 。 这 仅仅 是 一 个 参考 ,因为 使 用 大 型 问题 算法 有 一 些 条 
件 。 对 于 fminunc 函数 来 说 ,必须 提供 梯度 信息 。 

LargeScale: 当 设 为 on 时 ,使 用 大 型 算法 , 硅 设 为 off, 则 使 用 中 型 问题 的 算法 。 
适用 于 天 型 和 中 型 算法 的 参数 如 下 。 

(1) Diagnostics: 打印 最 小 化 困 数 的 诊断 信息 。 

(2) Display: 显示 水 平 。 选 择 off ,不 显示 输出 ; 选择 iter, 显示 每 一 步 运 代 过 程 的 输出 ; 
选择 final, 显 示 最 终结 果 。 打 印 最 小 化 函数 的 诊断 信息 。 

(3) GradObj: 用 户 定义 的 目标 函数 的 梯度 。 对 于 大 型 问题 此 参数 是 必 选 的 ,对 于 中 型 问 
题 则 是 可 选项 。 

(4) MaxFunEvals: 图 数 评价 的 最 大 次 数 。 

(5) MaxJIter: 最 大 允许 迭代 次 数 。 

(6) TolFun: 函数 值 的 终止 容 限 。 

(7) ITolX: 工 处 的 终止 容 限 。 

只 用 于 大 型 算法 的 参数 如 下 。 

(1) Hessian: 用 户 定 义 的 目标 图 数 的 Hessian 息 阵 。 

(2) HessPattern: 用 于 有 限 差 分 的 Hessian 和 什 阵 的 稀 玖 形式 。 若 不 方便 求 fun 函数 的 稀 
下 Hessian 抢 阵 互 , 可 以 通过 用 梯度 的 有 限 差 分 获得 的 五 的 稀 玻 结构 (如 非 零 值 的 位 置 
等 ) 来 得 到 近似 的 Hessian 矩阵 H。 若 连 矩 阵 的 稀 玖 结构 都 不 知道 , 则 可 以 将 
HessPattern 设 为 密集 算 阵 ,在 每 一 次 近代 过 程 中 ,都 将 进行 密集 答 阵 的 有 限 差分 近似 
(这 是 默认 设置 )。 这 将 非常 麻烦 ,所 以 花 一 些 力气 得 到 Hessian 矩阵 的 稀 朴 结构 还 是 值 
得 的 。 

(3) MaxPCGIter: PCG 进 代 的 最 大 次 数 。 

《4) PrecondBandWidth: PCG 前 处 理 的 上 带宽 ;默认 为 零 。 对 于 有 些 问 题 , 增 加 带宽 可 以 
(5) TolPCG: PCG 迭代 的 终止 容 限 。 

(6) TypicalX: 由 型 工 值 。 

只 用 于 中 型 算法 的 参数 如 下 。 

(1) DerivativeCheck : 对 用 户 提 供 的 导数 和 有 限 差分 求 出 的 导数 进行 对 比 。 

(2) DiffMaxChange: 变量 有 限 差 分 梯度 的 最 大 变化 。 

(3) DifMinChange: 变量 有 限 差分 梯度 的 最 小 变化 。 

(4) LineSearchType: 一 维 扫 索 算法 的 选择 。 

描述 退出 条 件 如 下 。 

《1) 一 0: 表示 目标 函数 收敛 于 解 x 处， 

(2) 二 0: 表示 已 经 达到 函数 评价 或 迭代 的 最 大 次 数 。 

(3) 一 0; 表示 目标 图 数 不 收 伍 。 

该 参数 包含 的 优化 信息 如 下 。 

(1) output. iterations: 运 代 次 数 。 

(2) output. algorithm: 所 采用 的 算法 。 

(3) output. funcCount: 图 数 评价 次 数 。 

(4) output. cgiterations: PCG 进 代 次 数 ( 只 适用 于 天 型 规划 问题 ) 。 

(5) output. stepsize: 最 终 步 长 的 大 小 (只 用 于 中 型 问题 ) 。 

(6) output. firstorderopt: 一 阶 优化 的 度量 , 解 x 处 梯度 的 范 数 
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2，minsearch 函数 


1) 功能 

求解 多 变量 无 约束 吗 数 的 最 小 值 。 

2) 语法 

x = fminsearch( fun, x0) 

x = fminsearch(fun,x0, options) 

XxX = fminsearch(fun,x0, options,Pl,P2, 1) 
[x, fval|] = fminsearcht( … ) 

[x, fval,exitflag] = fminsearch( … ) 


[x, fval, exitflag,output| = fminsearcht( … ) 


3) 描述 

fminsearch 求解 多 变量 无 约束 函数 的 最 小 值 。 该 函数 常用 于 无 约束 非 线 性 最 优化 
问题 。 

(1) xx 一 fminsearchCfun.x0): 初 值 为 zo, 求 fun 因数 的 局 部 极 小 点 工 。zo 可 以 是 标 
量 ,向量 或 矩阵 。 

(2) x 一 fminsearch (fun, x0, options):， 用 options 参数 指定 的 优化 参数 进行 最 
小 化 。 

(3) x 二 {minsearch(f{un,x0,options,Pl,P2,…); 将 问题 参数 Pi、P; 等 直接 和 输 给 目 
标明 数 fun, 将 options 参数 设置 为 空 和 矩阵 ,作为 options 参数 的 默认 值 。 

(4) [x,fval] 二 fminsearch(…): 将 工人 处 的 目标 汝 数值 返回 到 fval 参数 中 ， 

(5) [x,fval,exitflag|」 二 fminsearch(*…): 返回 exitflag 值 ;描述 肾 数 的 退出 条 件 。 

(6) | x,fval, exitflag ,output | 一 fminsearch(…); 返回 包含 优化 信息 的 输出 参数 
Output, 

4) 变量 

各 变量 的 意义 同 前 。 

5) 算法 

fminsearch 使 用 单纯 形 法 进行 计算 。 

对 于 求解 二 次 以 上 的 问题 ,fminsearch 函数 比 fminunc 图 数 有 效 。 但 是 , 当 问 题 为 高 
度 非 线 性 时 ,fminsearch 函数 更 具 稳健 性 ， 

6) 局 限 性 

应 用 fminsearch 时 数 可 能 会 得 到 局 部 最 优 解 。fminsearch 图 效 只 对 实数 进行 最 小 
化 , 即 工 必须 由 实数 组 成 ,f(z) 函 数 必 须 返 回 实 数 。 如 有 果 工 是 复数 ,必须 将 它 分 为 实 部 和 
虚 部 两 部 分 。 


16.3.3 ”无 约束 非 线性 规划 问题 的 应 用 


【 例 16-9】 求解 下 列 无 约束 非 线 性 因数 的 最 小 值 : 
f(r) = B31 — 271xs + 273 


字 葵 图 深 


代码 设置 如 下 : 
functionf = exl6 9(x) 下 
f = 3xx(1)*2 — 2xx(1) * x(2) 十 2x xx(2)^2: 且 


在 MATLAB 命令 行 窗 口 输入 下 列 代 三 : 


xz0 = [1,11]; 
[x, fval] = fminunc((@®ex9 10,x0) 


结果 如 下 : 
x 二 

1l.0e—07 * 

一 0.1192 -0 1192 
fval = 

4.2633e— 16 


16.4 二 次 规划 


如 采 菏 非 线 性 规划 的 目标 也 数 为 日 变量 的 二 次 哨 数 ,约束 条 件 全 是 线性 函数 ,就 称 
这 种 规划 为 二 次 规划 。 


16.4.1 一 次 规划 困 数 quadprog 


1. 功能 


求解 二 次 规划 问题 。 


2. 语法 

xX = quadprog(H,f,A,b) 

x = quadprog(H, f,A,b,Aeqg, beq) 

x = quadprog(H,f£,A,b,AMAeq, beq,1b,ub) 

至 一 quadprog\( H, f，, A, b, Aeq, beq, 1b, ub, XO ) 


x = quadprog(H,f£,A,b,Aeq, beq,1b,ub,x0, options) 
[x,fval] = quadprog( … ) 

[x, fval, exitflag] = quadprog( … ) 

[xX, fval, exitflag, output] = quadprog( … ) 

[xX, fval, exitflag, output, lambda|] = quadprog( … ) 


(1) x 二 guadprog(H,f,A,b); 返回 向 量 zx, 最 小 化 蚂 数 1/2x Hx 十 fx ,其 约束 
条 件 为 Ar< 6。 
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(2) x 二 quadprog(H,f,A,b,Aegq:beq): 仍然 求解 上 面 的 问题 ,但 添加 了 等 式 约 束 
条 件 Aeqzr 一 beq。 

(3) x 二 quadprog(H,f,A,b,lb,ub); 定义 设计 变量 的 下 界 lb 和 上 界 ub ,使 得 lb 所 
Tub., 

(4) x 二 guadprog(H,f,AA,b,lb,ub,x0): 同上 ,并 设置 初 值 xo。 

(5) Xx 二 guadprog( 了 HH,f,A,b,lb,ub,x0,options): 根据 options 参数 指定 的 优化 参 
数 进行 最 小 化 。 

(6) [x,fval| 二 quadprog(…): 返回 解 工 处 的 目标 图 数值 fval 二 0. 5x' Hx 十 Faks 

(7) [x,fval,exitflag | 二 quadprog(…): 返回 exitflag 参数 ,描述 计算 的 退出 条 件 。 

(8) | x,fval, exitflag, output | 一 quadprog (…): 返回 包含 优化 信息 的 结构 输出 
Output., 

(9) | x,.fval,exitflag.output,lambda| 二 guadprog(…): 返回 解 工 处 包含 拉 格 胃 日 
滋 子 的 lambda 和 参数。 

注意 : 

(1) 一 般 地 ,如 果 问 题 不 是 严格 廿 性 的 ,用 quadprog 函数 得 到 的 可 能 是 局 部 最 优 解 。 

(2) 如 果 用 Aeq 和 beq 明确 地 指定 等 式 约束 ,而 不 是 用 1b 和 ub 指定 , 则 可 以 得 到 更 

(3) 车 工 的 组 分 没有 上 限 或 下 限 , 则 quadprog 函数 希望 将 对 应 的 组 分 设置 为 Inf( 对 
于 上 限 ) 或 一 In{t( 对 于 下 限 ), 而 不 是 强制 性 地 给 予 上 限 一 个 很 大 的 正 数 或 给 予 下 限 一 个 
很 小 的 负数 。 

(4) 对 于 大 型 优化 问题 , 若 没 有 提供 初 值 zo; 或 ro 不 是 严格 可 行 的 , 则 quadprog 函 
数 会 选择 一 个 新 的 初始 可 行 点 。 

(5) 若 为 等 式 约 束 , 且 quadprog 函数 发 现 负 曲 度 Cnegative curvature), 则 优化 过 程 
终止 ,exitflag 的 值 等 于 一 1。 


4。 和 其 法 


(1) 大 型 优化 算法 : 当 优 化 问题 只 有 上 界 和 下 界 , 而 没有 线性 不 等 式 或 等 式 约束 时 ， 
则 上 默认 算法 为 大 型 算法 。 或 者 ,如 有 末 优 化 问题 中 只 有 线性 每 式 , 而 没有 上 界 和 下 界 或 线 

本 法 是 基于 内 部 映射 牛顿 法 的 子 空间 置信 域 法 。 该 法 的 每 一 次 运 代 都 与 用 PCG 法 
求解 大 型 线性 系统 得 到 的 近似 解 有 关 。 

(2) 中 型 优化 算法 : guadprog 肾 数 使 用 活动 集 法 , 它 也 是 一 种 投影 法 ,首先 通过 求解 
线性 规划 问题 来 获得 初始 可 行 解 。 


5. 诊断 


(1) 大 型 优化 问题 。 大 型 优化 问题 不 允许 约束 上 限 和 下 限 相 等 ,如 大 lb(2) 王 一 ub(2)， 
则 给 出 如 下 出 错 信 息 : 


Equal upper and lower bounds not permitted in this large 一 scale method. Use equality 
constraints and the medium 一 scale method instead. 


若 优 化 模型 中 只 有 等 式 约束 ,仍然 可 以 使 用 大 型 算法 ; 如 果 模 型 中 既 有 等 式 约束 又 
有 边界 约束 , 则 必须 使 用 中 型 方法 。 
(2) 中 型 优化 问题 。 当 解 不 可 行 时 ,quadprog 函数 给 出 以 下 警告 


Warning:The constraints are overly stringent;there is no feasible solution. 


这 里 ,quadprog 晒 数 生成 使 约束 天 导 最 坏 程度 最 小 的 结 采 。 
当 等 式 约束 不 连续 时 ,给 出 下 面 的 警告 信息 : 


Warning:The equality constraints are overly stringent; there is no feasible solution. 


当 Hessian 和 矩阵 为 负 半 和 定时 , 则 生成 无 边界 解 ,给 出 下 面 的 警告 信息 : 


Warning: The solution is unbounded and at infinity; the constraints are not restrictive 


enough. 


这 里 ,quadprog 晴 数 返回 满足 约束 条 件 的 工 什 。 
6. 局 限 性 


显示 水 平 只 能 选择 off 和 final, 友 代 参数 iter 不 可 用 。 当 问题 不 定 或 全 定时 ,第 第 无 
解 ( 此 时 exitflag 参数 给 出 一 个 负 值 ,表示 优化 过 程 不 收 仇 )。 寿 正定 解 存在 , 则 quadprog 
曙 效 可 能 只 给 出 局 阁 g 极 小 值 ， 因为 问题 可 能 是 非 凸 的 。 对 于 大 型 问题 ,不 能 依靠 线性 等 
式 , 因 为 Aeq 必须 是 行 满 秩 的 , 即 Aeq 的 行 数 必须 不 多 于 列 数 。 硅 不 满足 要 求 , 则 必须 调 
用 中 型 算法 进行 计算 。 


16.4.2 一 次 规划 问题 的 应 用 


【 例 16-10】 | 工 值 。 


f(x) = 到 卫 了 2 一 Itz 一 27l 一 6zs 
式 中 
[Xi 十 z 污 2 
| 十 2X2 a 2 
pe 十 丰台 和 了 
LO0 近 - Ts0 < 近 Taz 
Cl1c 


C] ear 


578| 


MATLAB 科 学 计算 


= 1. 1 21 

= [2; -6]; 

i 

= [2; 27 3]; 

lb = zeros(2,1): 

委 调 用 二 次 规划 函数 

[x, fval, exitflag, output, lambda| = quadprog(H,f,A,b,[|],[|],1b) 


th 后 
Il 


最 优化 结 采 如 下 : 


Optimization terminated. 
到 二 
0.6667 
1 .3333 
fval = 
— 8. 2222 
exXxitflag = 
1 
Output = 
iterations: 3 
constrviolation: 1.1l02e— 016 
algorithm: 'medium— scale: active— set' 
firstorderopt: 8.881l8e— 016 
cgiterations: [| 
message: 'Optimization terminated.' 
Jambda = 
lower: [2xl1 doublel 
upper: [2xl doublel 
eqlin: [0Oxl cdouble | 
ineqlin: [3xl doublel 


可 见 zi 一 0. 6667 .zz 一 1. 3333 时 f(z) 最 小 ,并 且 方 程 求解 一 致 收敛 。 


16.S 有 约束 最 小 化 


在 有 约束 最 优化 问题 中 , 通 第 要 将 该 问题 转换 为 更 便 单 的 于 问题 ,这 些 了 于 问题 可 以 


求解 并 作为 兴 代 过 程 的 基础 。 早 期 的 方法 通常 是 通过 构造 惩罚 函数 来 将 有 约束 最 优化 
问题 转换 为 无 约束 最 优化 问题 进行 求解 。 现 在 ;这些 方 法 已 经 被 更 有 效 的 基于 K-T 
(Kuhn-Tucker) 方 程 解 的 方法 所 取代 。 


16.5.1 有 约束 最 小 化 困 数 fmincon 


1. 功能 


求 多 变量 有 约束 非 线 性 也 数 的 最 小 值 。 


> 


语法 


= fmincon(fun, x0,A,b) 

= fmincon( fun, x0,A,b, aedq beq) 

fminconl( fun, x0, A,b, Meq, beq, 1b, ub) 

= fmincon( fun,x0,A,b, Meq, beqg, lb, ub,nonlcon) 

= fminconl( fun, x0,A,b, Aeq,beq, lb,ub,nonlcon, options) 


MW 国 国 网 加 
I 


x = fminconl( fun, x0,A,b,Aeq, beqg,1b,ub,nonlcon,options,Pl,P2, .1 ) 
[x, fval] = fmincont( … ) 

[x, fval, exitflag|] = fmincon( … ) 

[x, fval, exitflag,output| = fmincon( … ) 

[xX, fval, exitflag, output, lambda|] = fmincon( … ) 

[x, fval, exitflag, output, lambda,grad|] = fmincon( … ) 

[x, fval, exitflag, output, lambda, grad, hessian| = fmincon( … ) 


3. 描述 


fmincon 用 于 求 多 变量 有 约束 非 线 性 项 数 的 最 小 值 。 该 果 数 篆 用 于 有 约束 非 线性 优 
化 问题 。 

(1) xx 一 fminconCfuny,x0,A,b): 给 定 初 值 xo :求解 fun 函数 的 最 小 值 X+。fun 负数 
的 约束 条 件 为 At 三 5 ,zxo 可 以 是 标量 、 回 量 或 矩阵 。 

(2) x 一 fmincon(fun;x0,AA,b,Aeg,beg): 最 小 化 fun 哺 数 ,约束 条 件 为 Aeqx 一 
beq 和 Az 生 2。 和 在 没有 不 等 式 存 在 , 则 设置 A 王 [| .6 二 |j]。 

(3) x 二 fminconCfuny,x0,A,b,Aeq:beq,lb,ub): 定义 设计 变量 工 的 下 界 lb 和 上 界 
ub ,使 得 总 是 有 lb 硅 x 夺 ub。 夺 无 等 式 存 在 , 则 令 Aeq 一 [| ]、beq 二 | |]。 

(4) x 一 fmincon (fun, x0,A,b.,Aeg,beq,lb,ub,nonlcon): 在 上 面 的 基础 上 ,在 
nonlcon 和 参数 中 提供 非 线性 不 等 式 c(x) 三 0 或 等 式 ceqCz) 一 0。fmincon 图 数 要 求 c(Cz) 反 0 
且 ceq(x) 一 0。 当 无 边界 存在 时 , 令 lb 一 [和 (或 )ub 一 [L]。 

(5) x = fmincon(fun,;x0,A,b,Aeqg,beq,lb,ub,nonlcon,options):; 用 options 人 参数 
指定 的 参数 进行 最 小 化 。 

(6) x = fminconCfunyx0,A.b,Aeq,beq,lb,ub,nonlcon,options,P1.,.P2，…): 将 
问题 参数 Pl 、P; 等 百 接 传递 给 图 数 fun 和 nonlcon。 咎 不 需要 这 些 变 量 , 则 传递 空 和 矩阵 
到 Ab、Aeq、beq、lb、ub、nonlcon 和 options 。 

(7) [x,fval] 二 fmincon(…): 返回 解 工 处 的 目标 果 数 值 。 

(8) [x,fval, exitflag | 一 fmincon(…): 返回 exitflag 参数 ,描述 力 数 计算 的 退出 
条 件 。 

(9) [ x, fval, exitflag, output | 一 fmincon(…): 返回 包含 优化 信息 的 输出 参 
Output., 

(10) | xfval,exitflag,outputy,lambda | 一 {minconCG…): 返回 解 工 处 包含 拉 格 明日 
乘 子 的 lambda 参数 。 

(11) [x,fval,exitflag,output,lambda,grad | 一 fmincon(…): 返回 解 z+ 处 fun 限 数 
的 梯度 。 
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(12) | x,fval,exitflag ,output;lambda,grad,; hessian | 一 fmincon(… ): 返回 解 过 处 
河 数 的 Hessian 和 矩 了 。 


人 


fun 


nonlcon 参数 计算 非 线 性 不 等 式 约 束 c(x) 三 0 和 非 线 性 等 式 约束 ceqCz) 王 0。 它 是 
一 个 包含 了 水 数 名 的 字 和 付 串 。 该 孙 数 可 以 是 M 文件 .内 部 文件 或 MEX 文件 。 它 要 求 输入 
一 个 回 量 x, 人 返回 两 个 变量 一 一 解 zx 处 的 非 线 性 不 等 式 同 量 c 和 非 线 性 等 式 回 量 ceq。 例 
如 ,看 nonlcon 一 'mycon', 则 M 文件 mycon. m 具有 的 形式 如 下 : 

function [c,ceq|] = mycon(x) 


0 和 计算 x 处 的 非 线 性 不 等 式 
EE 和 计算 x 处 的 非 线 性 等 式 


右 还 计算 了 约束 的 梯度 , 即 


options = optimset!( 'GradConstr', on ' ) 


则 nonlcon 函数 必须 在 第 3 个 和 第 4 个 输出 变量 中 返回 cCz) 的 梯度 GC 和 ceqGCz) 的 
梯度 GCeq。 当 补 调 用 的 nonlcon 图 数 只 需要 两 个 输出 变量 (此 时 优化 算法 只 需要 c 和 
ceg 的 值 ,而 不 需要 GC 和 gceg 的 值 ) 时 ,可 以 通过 查看 nargout 的 值 来 避 例 计算 GC 和 
GCed 的 值 。 


function [c,ceq,GC,GCeg] = mycon(x) 


Ee 各 解 x 处 的 非 线 性 不 等 式 

Ceq = … 针 解 x 处 的 非 线 性 等 式 

if nargout > 2 和 被 调用 的 nonlcon 函数 ,要 求 有 4 个 输出 变量 
Er 各 不 等 式 的 梯度 

GCeq = … 和 等 式 的 梯度 


end 


奇 nonlcon 图 数 返 回 长 度 为 天 的 回 量 c 和 长 度 为 n 的 回 量 x, 则 c(z) 的 梯度 GC 是 
一 个 允 关 ja 的 矩阵 ,其 中 GCCG,J) 是 c(C 门 对 并 (的 俩 导数 。 同 样 ,看 ceq 是 一 个 长 度 为 pp 
的 问 量 : 则 ceqCz) 的 柳 度 GCeq 是 一 个 了 关 志 的 窍 阵 ,其 中 GCeq(z7) 是 ceq(j ) 对 工 (7) 的 
偏 导 数 。 

其 他 参数 意义 同 前 。 

1) 大 型 优化 问题 

(1) 使 用 大 型 算法 ,必须 在 fun 因数 中 提供 梯度 信息 Coptions. GradObj 设置 为 on)。 
如 果 没 有 梯度 信息 , 则 给 出 警告 信息 。 

fmincon 因数 允许 gsCz) 为 一 个 近似 梯度 ,但 使 用 真正 的 梯度 将 使 优化 过 程 更 具 稳 

(2) 当 对 矩阵 的 二 阶 导 数 ( 即 Hessian 和 矩阵) 进行 计算 以 后 ,用 该 限 数 求解 大 型 问题 
将 更 有 效 。 但 不 需要 求 得 破 正 的 Hessian 矩阵。 如 末 能 提供 Hessian 窍 阵 的 稀 踊 结构 的 
信息 (用 options 参数 的 HessPattern 属性 ) , 则 fmincon 图 数 可 以 算得 Hessian 矩阵 的 称 


玻 有 限 差 分 近似 。 

(3) 在 zo 不 是 严格 可 行 的 , 则 fmincon 函数 选择 一 个 新 的 严格 可 行 初始 点 。 

(4) 帮工 的 某 些 元 紊 没 有 上 界 或 下 界 , 则 fmincon 图 数 更 希望 对 应 的 元 紊 设置 为 Inf 
(对 于 上 界 ) 或 -Inf( 对 于 下 界 ) ,而 不 希望 强制 性 地 给 上 界 赋 一 个 很 大 的 正 值 或 给 下 界 赋 
一 个 很 小 的 负 值 。 

(5) 线性 约束 最 小 化 课题 中 需要 注意 的 问题 如 下 。 

由 Aeq 和 窍 阵 中 在 存在 密集 列 或 近 黎 集 列 ,会 导致 满 秩 并 使 计算 避 时 。 

GO fmincon 果 数 昌 除 Aeq 中 线性 相关 的 行 。 此 过 程 需要 进行 反复 的 因 式 分 解 , 因 
此 ,如 条 相关 行 很 多 的 话 , 计算 将 是 一 件 很 费时 的 事情 。 

每 一 次 近代 都 要 用 下 式 进行 稀 压 最 小 二 乘 求解 : 


Aeq = AeqTRT 


其 中 ,RT 为 前 提 条 件 的 齐 累 斯 基因 子 ，。 

2) 中 型 优化 问题 

(1) 如 果 用 Aeq 和 beq 清楚 地 提供 等 式 约束 ,将 比 用 lb 和 ub 获得 更 好 的 数值 解 。 

(2) 在 二 次 于 问题 中 ,和 车 有 等 式 约束 并 且 因 等 式 (dependent equalities) 被 发 现 和 上 易 
除 ,将 在 过 程 标题 中 显示 dependent。 只 有 在 等 式 连续 的 情况 下 , 因 等 式 才 会 被 剔除 。 若 
等 式 系统 不 连续 , 则 子 问 题 将 不 可 行 并 在 过 程 标题 中 打印 infeasible 信息 。 


5. 算法 


(1) 大 型 优化 算法 。 在 提供 了 因数 的 梯度 信息 ,并 且 只 有 上 下界 存 在 或 只 有 线性 等 
式 约束 存在 时 , 则 fmincon 函数 将 默认 选择 大 型 算法 。 本 法 基于 内 部 映射 牛顿 法 的 子 空 
间 置 信 域 法 。 该 法 的 每 一 次 迭代 都 与 用 PCG 法 求解 大 型 线性 系统 得 到 的 近似 解 有 关 。 

(2) 中 型 优化 算法 。fmincon 哨 数 使 用 序列 二 次 规划 法 (SQP)。 本 法 中 ,每 一 步 迭 
代 都 求解 二 次 规划 子 问题 ,并 用 BFGS 法 更 新 拉 格 朗 日 Hessian 和 矩阵 。 


6. 诊断 


求 大 型 优化 问题 的 代码 中 不 允许 上 限 和 下 限 相 等 , 即 不 能 有 1b(2) 二 二 ub(2) ,否则 
给 出 出 错 信息 如 下 : 


Equal upper and lower bounds not permitted in this large 一 scale 
method. 
Use equality constraints and the medium— scale method instead. 


若 只 有 等 式 约束 ,仍然 可 以 使 用 大 型 算法 。 当 既 有 等 式 约束 又 有 边界 约束 时 ,使 用 
中 型 算法 。 


7. 局 限 性 


目标 函数 和 约束 函数 都 必须 是 连续 的 ,和 否则 可 能 会 给 出 局 部 最 优 解 ; 当 问 题 不 可 行 
时 ,fmincon 函数 将 试图 使 最 大 约束 值 最 小 化 ; 目标 函数 和 约束 函数 都 必须 是 实数 ; 对 于 
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大 型 优化 问题 ,使 用 大 型 优化 算法 时 ,用 户 必须 在 fun 函数 中 提供 梯度 Coptions 参数 的 
GradObj 属性 必须 设置 为 on) ,并 且 只 可 以 指定 上 界 和 下 界 约 束 ,或 者 只 有 线性 约束 存 
在 ,Aeq 的 行 数 不 能 多 于 列 数 。 现 在 ,如 果 在 fun 函数 中 提供 了 解析 梯度 ,选项 参数 
DerivativeCheck 不 能 与 大 型 方法 一 起 用 ,以 比较 解析 梯度 和 有 限 差分 梯度 ,可 以 通过 将 
options 参数 的 Maxlter 属性 设置 为 0 来 用 中 型 方法 核对 导数 ,然后 用 大 型 方法 求解 
问题 。 


16.5.2 有 约束 最 小 化 的 应 用 


【 例 16-11】 找到 使 遇 数 / nd zs 最 小 化 的 值 - 其 中 0 夺 XT1 十 2xz 十 2x3 
12 


Te 各 


代码 设置 如 下 : 


function f = exl6 11(x) 
f = —2xx(l1) x% x(2) *% x(3); 


在 MATLAB 命令 行 窗口 输入 下 列 代码 : 


x0 = [10; 10; 10]:; 竺 初 值 
A=[-1-2—-2; .… 
1 2 2]: 


b= [0;72]; 
[x, fval] = fmincon((@exl6 11, x0, A,b) 


结果 如 下 : 

下 Fe 
24.0000 
12.0000 
12.0000 

fval = 


— 6.9120e+ 03 


16.6 目标 规划 


前 面 介绍 的 最 优化 方法 只 有 一 个 目标 函数 ,是 单 目标 最 优化 方法 。 但 是 ,在 许多 实 
际 工程 问题 中 ,往往 希望 多 个 指标 都 达到 最 优 值 ,所 以 它 有 多 个 目标 函数 。 这 种 问题 称 
为 多 目标 最 优化 问题 。 


16.6.1 目标 规划 国 数 fgoalattain 
1. 功能 
求解 多 目标 达到 问题 。 
2. 语法 
= fgoalattain(fun,x0, goal,weight) 
= fgoalattain(fun, x0, goal,weight, A, b) 
= fgoalattain(fun,x0, goal,weight, A, b, Aeq, beq) 


= fgoalattain(fun,x0,goal,weight, Mh, b, Meq, beq, 1b, ub) 
= fgoalattain(fun,x0,goal,weight, A, b, Aeq, beq, 1b, ub, nonlcon) 


网 MN MN MN MN Mm 


= fgoalattain(fun, x0,goal,weight, A, b, Aeqg, beqg, lb, ub, nonlcon, options) 

x = fgoalattain(fun,x0,goal,weight, Bh, b,MAeqg,beq,1b,ub,nonlcon,options,Pl,P2, -1) 
[x,fval|] = fgoalattain( … ) 

[x, fval,attainfactor| = fgoalattaint( … ) 

[x, fval,attainfactor, exitflag| = fgoalattain( … ) 

[x, fval,attainfactor, exitflag,output| = fgoalattain( … ) 

[x, fval,attainfactor, exitflag, output, lambda| = fgoalattain( … ) 


fgoalattain 曙 数 用 于 求解 多 目标 达到 问题 。 

(1) x 二 fgoalattain(fun,x0,goal,weight) :试图 通过 变化 工 来 鸽 目标 因数 fun 达到 
goal 指定 的 目标 。 初 值 为 xo.weight 参数 指定 权重 。 

(2) x 一 fgoalattain(fun.x0.goal,weight,AA.b);: 求解 目标 达到 问题 ,约束 条 件 为 线 
性 不 等 式 Arz<p。 

(3) x 一 fgoalattain(Cfun,x0y,goal,weight,A,b,Aeqybeq): 求解 目标 达到 问题 , 除 提 
供 上 面 的 线性 不 等 式 以 外 ,还 提供 线性 等 式 Aeqz 二 beq。 当 没有 不 等 式 存 在 时 ,设置 
三 | 一 LU 

(4) x 一 fgoalattain(fun,x0,goal,weight,A,b,Aeg,;beg,lb,ub); 为 设计 变量 工 定 
义 下 界 lb 和 上 界 ub 集合 ,这 样 始终 有 1lb 运 z 和 二 ub。 

(5) x 一 fgoalattain(Cfun,x0,goal, weight,A,b,Aeq,beq,lb,ub,nonlcon): 将 目标 
达到 问题 归结 为 nonlcon 参数 定义 的 非 线性 不 等 陈 cCz) 三 0 或 非 线 性 等 式 ceqd(CZz) 一 0。 
fgoalattain 函数 优化 的 约束 条 件 为 ce(z) 三 0 和 ceq(Cz) 二 0。 若 不 存在 边界 , 则 设置 lb 一 
[和 (或 )ub 二 []。 

(6) x = fgoalattain(fun,x0,goal,weight, A,b,Aeqg,beq,;lb,ub,nonlcon,options): 
用 options 中 设置 的 优化 参数 进行 最 小 化 。 

(7) x = fgoalattain (fun,x0,goal, weight, A,b, Aeg, beg,l1b,ub,nonlcon,options, 
P1.P2.…): 将 问题 参数 P11 、P; 等 直接 传递 给 因数 fun 和 nonlcon。 如 果 不 需 要 参数 A、 
bp、Aeq.beqg.,lb.ub..nonlcon 和 options, 则 将 它们 设置 为 空 矩 阵 。 

(8) | x,fval | 二 fgoalattain(… ): 返回 解 工 处 的 目标 因数 值 。 
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(9) [x,fval,attainfactor | 一 fgoalattain(…): 返回 解 x 人 钼 的 目标 达到 因子 ，。 

(10) [x,fval,attainfactor, exitflag | 一 fgoalattain(…): 返回 exitflag 参数 ,描述 计 
算 的 退出 条 件 。 

(11) |x,fval,attainfactor,exitflag,output| 一 fgoalattain(…): 返回 包含 优化 信息 
的 输出 参数 output。 

(12) | xfval,attainfactoryexittlag,outputylambda | 一 {goalattain(…); 返回 包含 拉 


格 明 日 乘 子 的 lambda 参数 。 
4. 变量 


1) goal 变量 

目标 和 希望 达到 的 向 量 值 。 回 量 的 长 度 与 fun 函数 返回 的 目标 数 下 相等 。fgoalattain 
了 商 数 试图 通过 最 小 化 向量 下 中 的 值 来 达到 goal 参数 给 定 的 目标 。 

2) nonlcon 哺 数 

nonlcon 函数 计算 非 线 性 不 等 式 约束 c(x) 三 0 和 非 线 性 等 式 约束 ceq(Cz) 一 0。 
nonlcon 因数 是 一 个 包含 国 数 名 的 字符 串 :该 国 数 可 以 是 M 文件 .内 部 恩 数 或 MEX 文 
件 。nonlcon 因数 震 要 输入 回 量 ,返回 两 个 变量 一 一 处 的 非 线性 不 等 式 回 量 c 和 处 
的 非 线性 等 式 向 量 ceq。 例 如 , 若 nonlcon 一 'mycon', 则 M 文件 的 形式 如 下 : 


function [c,ceq] = mycon( 工 ) 


c= 计算 x 处 的 非 线性 不 等 式 
ceq = -…- # 计算 x 处 的 非 线 性 等 式 


特约 束 限 数 的 梯度 可 以 计算 ,是 options. GradConstr 设 为 on, 即 


options = optimset( 'GradConstr', 'on') 


则 加 数 nonlcon 也 必须 在 第 3 个 和 第 4 个 输出 变量 中 输出 cGz) 的 梯度 GC 和 ceq(x) 
的 梯度 GCeq。 可 以 通过 核对 nargout 参数 来 溃 人 免 计 算 GC 和 GCeqg。 


function [c,ceq,GC,GCegq] = mycon(x) 


CcC = :… 名 文 处 的 非 线 性 不 等 式 

Ceq = :… 竺 入 处 的 非 线 性 等 式 

if nargout > 2 名 被 调用 的 nonlcon 函数 ,有 4 个 输 出 
BC = 当 不 等 式 的 梯度 
GCeq = »… 名 等 式 的 梯度 

end 


在 nonlcon 次数 返回 长 度 为 m 的 癌 量 c 和 长 度 为 n 的 工 , 则 cl(z) 的 梯度 GC 是 一 个 
nXm 的 矩阵 ,其 中 GCCGi 7 站 是 cGD) 对 工 (2 的 俩 导数 。 同 样 , 咎 ceq 是 一 个 p 元 窒 的 问 
量 , 则 ceq(z) 的 梯度 GCeq 是 一 个 nXXp 的 矩阵 ,其 中 GCeg(i,7) 是 ceq(7) 对 工 ( 让 的 仿 


3) options 变量 

优化 参数 选项 。 可 以 用 optimset 图 数 设 置 或 改变 这 些 参 数 的 值 。 

(1) DerivativeCheck: 比较 用 户 提供 的 导数 (目标 因数 或 约束 曙 数 的 梯度 ) 和 有 限 差 
分 导数 。 

(2) Diagnostics: 打印 将 要 最 小 化 或 求解 的 图 数 的 诊断 信息 。 

(3) DiffMaxChange: 变量 中 有 限 差分 柳 度 的 最 大 变化 。 

(4) DiffMinChange: 变量 中 有 限 差分 梯度 的 最 小 变化 。 

(5) Display: 显示 水 平 。 设 置 为 off 时 不 显示 输出 ; 设置 为 iter 时 显示 每 一 次 进 代 
的 输出 ; 设置 为 final 时 只 显示 最 终结 果 。 

(6) GoalExactAchieve: 使 得 目标 个 数 刚好 达到 ,不 多 也 不 少 。 

(7) GradConstr: 用 户 定 义 的 约束 也 数 的 梯度 。 

(8) GradObj: 用 户 定 义 的 目标 困 数 的 梯度 。 使 用 大 型 方法 时 必须 使 用 梯度 ,对 于 中 
型 方法 则 是 可 选项 。 

(9) MaxFunEvals: 因数 评价 的 人 允许 最 大 次 数 。 

(10) MaxJIter: 因数 渤 代 的 允许 最 大 次 数 。 

(11) MeritFunction: 如 来 设 为 multiobj, 则 使 用 目标 达到 或 最 大 最 小 化 目标 晒 效 的 
方法 ; 在 设置 为 singleobj: 则 使 用 fmincon 畏 数 计算 目标 盟 数 。 

(12) TolCon: 约束 政大 的 终止 容 限 。 

(13) TolFun: 晒 数 值 处 的 终止 容 限 。 

(14) Tolx: 工 处 的 终止 容 限 。 

4) weight 变量 

weight 杰 量 为 权重 回 量 :可 以 控制 低 于 或 超过 fgoalattain 图 数 指 定 目 标的 相对 程 
度 。 当 goal 的 值 都 是 非 零 值 时 ,为 了 保证 活动 对 象 超过 或 低 于 的 比例 相当 ,将 权重 盯 数 
设置 为 abs(Cgoal) 。 

注意 : 当 目 标 值 中 的 任意 一 个 为 零 时 ,设置 welght 一 abs(Cgoal) 将 导致 目标 约束 看 起 
来 更 像 硬 约束 ,而 不 像 目 标 约 束 ; 当 加 权 函 数 weight 为 正 时 ,fgoalattain 函数 试图 使 对 
界 小 于 目标 值 。 为 了 使 目标 函数 大 于 目标 值 ,将 权重 weight 设置 为 负 ; 为 了 使 目标 函数 
尽 可 能 地 接近 目标 值 , 使 用 GoalsExactAchieve 参数 ,将 fuan 函数 返回 的 第 一 个 元 素 作 为 
目标 。 

5) attainfactor 变量 

attainfactor 尺 量 是 超过 或 低 于 目标 的 个 数 。 硅 attainfactor 为 仙 , 则 目标 已 经 沪 出 ; 
若 attainfactor 为 正 , 则 目标 个 数 还 未 达到 。 

其 他 参数 意义 同 前 。 


5. 算法 


多 目标 优化 同时 涉及 一 系列 对 象 。fgoalattain 因数 求解 该 问题 的 基本 算法 是 目标 达 
到 法 。 该 法 为 目标 蚂 数 建立 起 目标 值 。 多 目标 优化 的 有 具体 算法 已 经 在 前 面 进行 了 详细 
的 介绍 。 

fgoalattain 国 数 使 用 序列 二 次 规划 法 (SQP) ,前 面 已 经 进行 了 较 多 的 介绍 。 算 法 中 
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对 于 一 维 搜索 和 Hessian 答 阵 进行 了 修改 。 当 有 一 个 目标 肾 数 不 表 发 生 改 善 时 ,一 维 搜 
系 终 止 。 修 改 的 Hessian 和 窍 阵 信 助 于 本 问题 的 结构 ,也 被 采用 。attainfactor 参数 包含 解 
处 的 Y 值 。Y 取 负 值 时 表示 目标 溢出 。 


6. 局 限 性 
目标 晒 数 必须 是 连续 的 。fgoalattain 因数 将 只 给 出 局 部 最 优 艇 。 


16.6.2 目标 规划 的 应 用 


【 例 16-12】 考虑 下 列 线性 微分 方程 组 的 求解 问题 。 
T= (A BKC)Ir+ Bu 


y= Cr 
— 1.5 0 局 一] | 
1  O 一 一】 
点 一 0) -一 上 比 12 B= 2 CO—2 { 二 | | Kk 一 | | 
0 0 一 1] 一 一 
0 | 一 此 0 |] | 


functionF = exl6 12(K,A,B,c) 
F = sort(eig(A—BxKx C)); 


在 MATLAB 命令 行 窗 口 输入 下 列 代 码 : 


n= 150070 212;01— 2) 
B= [TT-10:;2-2;011]1:; 
C= [100;00 -1]; 


| = i ee 

goal = 35 3 1s 

weight = abs(goal ); 

lb = -4x ones(size(KO)):; 

ub = 4*x* ones(size(KO)):; 

options = optimset( 'Display', 'iter'); 

[K, fval,attainfactor|] = fgoalattain((®(K) ex16 12(K,A,B,C), {…§: 
KO, goal, weight,[ ],[],[],[ 1],1b,ub,| |],options) 


结 朱 如 下 : 
httainment Max Line search Directional 
Iter F 一 count factor constraint steplength derivative Procedure 
0 6 0 2.12104 
1 13 2.068 9.297e— 05 1 0.994 
2 20 1. 099 0 1 人 D. 224 
Hessian modified 
| 27 0. 7693 0. 1285 由 一 0.659 


Hessian modified 


4 38 
ep 45 
6 52 
Hessian modified 
7 59 
8 66 
Hessian modified 
9 了 3 
Hessian modified 
10 80 
Hessian modified 
11 87 
modified twice 
12 94d 
Hessian modified 
13 101 
Hessian modified 
14 109 
Hessian modified 
15 116 
16 124 
17 131 
modified twice 
18 138 
Hessian modified 
19 145 
20 152 
Hessian modified 
21 159 
Hessian modified 
22 167 
23 174 
Hessian modified 
24 183 
25 193 
Hessian modified 
26 200 
Hessian modified 
27 207 
28 215 
29 222 
30 229 
Hessian modified 
31 236 
Hessian modified 
32 243 
modified twice 
33 250 


Hessian modified 


0.7501 
0.7401 
0. 6361 


1. 293 
1. 038 


0. 7053 


0. 7006 


0.628 


D0. 3513 


0. 8942 


1.035 
0. 9216 


D0. 8747 


0.726 
0. 7138 


D0.664 
0. 6231 


0. 354 


0.4331 


D0. 4292 


0.08708 


1. 165 


0. 2802 


0. 2728 


DO. 2701 


D0.2975 0. 0625 — 0.0316 
D0.1576 1 — 0.0169 
0. 8004 1 一 0. 0548 
0 1 0.636 
0 1 一 0. 243 
0. 00498 1 一 本 
0. 0001398 1 一 0. 173 
0.01929 1 — 0.0754 
0. 5489 1 一 0. 0921 
0 1 0. 134 
一 0. 02577 0.5 = 0. 11 
0.5423 1 — .301 
0.3648 0.5 0. 325 
i.69r 1 一 0.0424 
0 1 0. 211 
0 1 — 0.949 
.2295 1 — 00. 032 
0. 03697 1 一 心 0.332 
0.2015 D0.5 —0.178 
0. 05764 1 — 0. 0174 
0.04529 和 过 包 一 生 201 
0. 0529 D0. 1235 一 DD. 152 
0. 2946 1 0 133 
0.4736 1 0.0984 
0.3874 0.3 一 0.0037 
.427 1 — D0.0713 
0 1 0. 283 
0. 01661 1 — 0. 964 
D0. 00204 1 一 DD. 128 
ms 1 一 0. O747 


Hess1ian 


Hess1ian 


Hess1ian 


《了 


co 


~ 
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34 257 0. 08656 0. 3223 1 — 0. 0617 
Hessian modified 

35 264 0. 1897 0. 06426 1 0. 09 
Hessian modified 

36 271 0. 1668 0. 01085 1 — 0. 129 
Hessian modified 

37 278 0. 1547 0. 000221 1 一 0. 0686 
Hessian modified 

38 285 0. 1199 0. 0129 1 ~ 0 0526 
Hessian modified 

39 292 0. 1215 0.0001643 1 0.105 

40 299 0.1214 7.818e 一 08 1 pe hl Hessian 


modified twice 
Local minimum possible. Constraints satisfied. 


fgoalattain stopped because the size of the current search direction is less than 
twice the default value of the step size tolerance and constraints are 


satisfied to within the default value of the constraint tolerance. 


< stopping criteria details> 


| 1.2716 -4.0000 
4.0000 -3.6788 


attainfactor = 


0.1214 


/ 【 例 16-13】 某 化 工厂 拟 生 产 两 种 新 产品 A 和 B, 其 生产 设备 费用 分 别 为 A: 3 万 
| 元 / 吨 ; B: 5 万 元 / 吨 。 这 两 种 产品 均 将 造成 环境 和 污染, 设 由 公害 所 造成 的 损失 可 折算 为 
| A:4 万 元 / 吨 ; B: 1 万 元 / 吨 。 由 于 条 件 限制 ,工厂 生产 产品 A 和 产品 B 的 最 大 生产 能 
力 分 别 为 每 月 4 吨 和 6 吨 , 而 市 场 需 要 这 两 种 产品 的 总 量 每 月 不 少 于 8 吨 。 试 问 工厂 如 
何 安 排 生产 计划 ,在 满足 市 场 需要 的 前 提 下 ,使 设备 投资 和 公害 损失 均 达 最 小 ? 该 工厂 
决策 认为 ,这 两 个 目标 中 环境 污染 应 优先 考虑 ,设备 投资 的 目标 值 为 17 万 元 ,公害 损失 
的 目标 为 13 万 元 。 

设 工 厂 每 月 生产 产品 A 为 z 立 吨 ,B 为 ze 吨 , 设备 投资 费 为 万 (Cz), 公 害 损 失 费 为 户 (Cz)， 


则 这 个 问题 可 表达 为 多 目标 优化 问题 。 


L 
function f= ex16 13(x) 县 


f(1}=3x% x(1)+5 x x(2); 
f(2} = 4 x(1)+x(2)- 


给 定 目 标 , 权 重 按 目标 比例 确定 ,给 出 初 值 : 


goal = [17 13]; 
weight = [17 13]; 
xz0=[25]; 


给 出 约束 条 件 的 系数 : 


A=[100 1:—1—1|; 
b=[46 -8]; 
lb= zeros(2,1); 
[x, fval,attainfactor, exitflag| = … 
fgoalattain(@ex16_13, x0, goal, weight, A, b,[ ],[],1b,[]) 


计算 结 采 如 下 : 
2 

4.0000 4.0000 
fwal = 


32.0000 20.0000 


ttaInfactor = 


0.8824 


eXxitflag = 


寻 


故 工 厂 每 月 生产 产品 人 A 为 4 吨 ,B 为 4 吨 。 设 备 投 资费 和 公害 损失 费 的 目标 值 分 列 
为 32 万 元 和 20 万 元 。 达 到 因子 为 0.8824, 订 算 收 钙 。 

【 例 16-143】 未 工厂 因 生 产 震 要 和 欲 采购 一 种 原材料 ,市场 上 的 这 种 原料 有 两 个 等 级 ， 
甲 级 单价 5 元 /和 干 殉 ; 乙 级 单价 2 元 /和 干 殉 。 要 求 所 花 吕 费用 不 超过 500 元 , 购 得 原料 总 量 
不 少 于 300 和 干 殉 , 其 中 甲 级 原料 不 少 于 50 和 干 现 。 问 如 何 确定 最 好 的 采购 方案 ? 


曾 590 


MATLAB 科 学 计算 


这 里 设 ri zz 分 别 为 采购 甲 级 和 乙 级 原料 的 数量 (千克 ) ,要求 采购 总 费用 尽量 少 , 采 
购 总 重量 尽量 多 ,采购 甲 级 原料 尽量 多 。 

由 题 意 ,代码 设置 如 下 : 

function f= exl6 14(x) 

f(1}=5x% x(1)+ 2 x(2); 


f(2) =— x(1) 一 x(2); 
ee 


给 定 目 标 , 权 重 按 目标 比例 确定 ,给 出 初 值 : 
goal=[500 一 300 501]; 


weight = [500 — 300 50]; 
4 


给 出 约束 条 件 的 系数 : 
m= [9 2 1 1 L100|- 
b= [500 -300 — 50]; 

lb= zeros(2,1); 


[x, fval, attainfactor, exitflag|] = fgoalattain((Sexl6 14,x0, goal, - 
weight,A,b,[ ],[],1b,[],[]) 


输出 计算 结 末 如 下 : 


535.0250 54.8299 


fval = 


384.7847 一 109.8549 一 55.0250 


attainfactor = 


一 0.1740 


eXxitflag = 
0 
所 以 ,最 好 的 采购 方案 是 采购 甲 级 原料 和 乙 级 原料 分 别 为 55.0250 和 干 到 和 54. 8299 干 


殉 。 此 时 采购 总 费用 为 384. 7847 元 ,总 重量 为 109. 8549 和 干 死 , 甲 级 原料 总 重量 为 
55. 0250 于 殉 。 


16.7 最 大 最 小 化 


通 弟 过 到 的 部 是 目标 函数 的 最 大 化 和 最 小 化 问题 ,但 是 在 茶 些 悄 况 下 .; 则 要 求 最 大 
但 的 最 小 化 才 有 意义 。 例 如 ,城市 规划 中 需要 确定 急救 中 心 、 消 nd 
标 困 数 应 该 是 到 所 有 地 点 最 大 距离 的 最 小 值 , 而 不 是 到 所 有 目的 地 的 距离 和 为 最 小 。 
是 两 种 完全 不 同 的 准则 ,在 控制 理论 . 通 近 论 .决策 论 中 也 使 用 最 大 最 小 化 原则 。 
MATLAB 优化 工具 箱 中 采用 订 列 二 次 规划 法 求解 最 大 最 小 化 问题 。 


16.7.1 最 大 最 小 化 因数 fminimax 


1. 功能 
求解 最 大 最 小 化 问题 。 
2. 语法 


= fminimax(fun,x0) 

= fminimax(fun,x0,A,b) 

= fminimax(fun, x0,A,b,Aeq,beq) 

= fminimax(fun, x0,A,b, Meq,beq,1b, ub) 

= fminimax(fun, x0,AM,b, Meq,beqg,1b, ub,nonlcon) 


MM 


= fminimax( fun,x0,A,b,Aeq,beqg,1b,ub,nonlcon,options) 

x = fminimax(fun,x0,A,b,MAeq,beqg,1b,ub,nonlcon,options,Pl,P2, …) 
[x, fval|] = fminimax( -… ) 

[xX, fval,maxfval| = fminimax( … ) 

[x, fval, maxfval,exitflag|] = fminimax( … ) 

[x, fval, maxfval, exitflag,output|] = fminimax( … ) 


[x, fval, maxfval, exitflag, output, lambda|] = fminimax( … ) 


fminimax 了 国 数 用 于 使 多 目标 晒 数 中 的 最 坏 情 况 达 到 最 小 化 。 给 定 初 值 佑 计 , 该 值 必 
须 服从 一 定 的 约束 条 件 。 

(1) x 二 fminimaxCfun,x0): 初 值 为 zo ;找到 fun 图 数 的 最 大 最 小 化 解 zx。 

(2) x 二 fminimax(fun;x0, 和 人,b):; 给 定 线 性 不 等 式 Az 和 5, 求解 最 大 最 小 化 问题 。 

(3) x 一 fminimax(Cfuny,x,A,b,Aeq,beq): 给 定 线 性 等 式 ,Aeqz 一 beq, 求 解 最 大 
最 小 化 问题 。 如 条 没有 不 等 陈仓 在 , 则 设置 A 一 [2 一 [|]。 

(4) x 二 fminimax(Cfuny: xy* Ab,Aeqybeqylb,ub): 为 设计 变量 定 光 一 系列 下 限 1b 和 
上 限 ub, 使 得 总 有 lb 二 zsub。 

(5) Xx 一 fminimaxCfun,x0,A.b,.Aeq:beq,lb,ub,nonlcon): 在 nonlcon 参数 中 给 定 
ceq(Cz) 二 0。 寿 设 有 边界 存在 , 则 设置 lb 一 [| 和 (或 )ub 一 | |。 


(6) x 一 fminimaxCfuny,x0,A,b,Aeq,beq,lb,ub,nonlcon,options) : 用 options 给 和 定 


~ 


一 宾 宫 党 目 肉 
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的 参数 进行 优化 。 

(7) x 一 fminimax(fun,x0,A,b,Aeg,;beg;lb,ub,nonlcon,options,; Pl1,;P2,…:); 将 
问题 参数 Pi 、P。 等 直接 传递 给 因数 fun 和 honlcon。 如 果 不 需 要 变量 Ap、Aeq、beq、lb、 
ub、nonlcon 和 options: 则 将 它们 设置 为 空 矩 阵 。 

(8) [x,fval| 二 fminimax(…): 返回 解 工 处 的 目标 申 数 值 。 

(9) | xfval,maxfval | 一 fminimax(…): 返回 解 x 人 钼 的 最 大 了 滑 数 值 。 

(10) | x,fval,maxfval,exitflag | 一 fminimax(…): 返回 exitflag 参数 ,描述 阴 数 计 
算 的 退出 条 件 。 

(11) | x,fval,maxfval,exitflag ,output | 一 fminimax(…): 返回 描述 优化 信息 的 结 
构 输 出 output 参数 。 

(12) | x,fval,maxfval,exittlag,outputylambda | 二 fminimax(…): 返回 包含 解 工 处 
拉 格 明日 乘 子 的 lambda 参数 。 


4. 变量 


maxfval 变量 用 于 解 工 处 曙 数 值 的 最 大 值 , 即 maxfval 一 max‘ifun(x)}。 


fminimax 因数 使 用 序列 二 次 规划 法 (CSQP) 进 行 计 算 ,对 一 维 搜索 法 和 Hessian 矩阵 
的 计算 进行 了 修改 。 当 有 一 个 目标 困 数 不 再 发 生 改 善 时 ,一 维 搜索 终止 。 修 改 的 
Hessian 和 矩阵 借助 于 本 问题 的 结构 ,也 被 采用 ， 


6. 局 限 性 
目标 函数 必须 连续 ,否则 fminimax 函数 有 可 能 给 出 局 部 最 优 解 。 


16.7.2 最 大 最 小 化 的 应 用 


【 例 16-1S] 找到 如 下 因数 的 最 大 最 小 值 。 
上 | 
其 中 
Cx) = 2x1 + zi CO— 48x1 — 40xz + 304 
fz (x) 一 一 并 1 一 3 
far) = 工 十 3zz 一 18 
Tat 
nt 
代 人 码 设 置 如 下 : 
function f = exl6 15(x) 


£f(1}= 2x% x(1})*2+ x(2)*2— 48 x x(1}) -— 40 x x(2) + 304; 竺 目标 
Fl2) = — Xl1)"2 — 3%x(2)"2. 


f(3} = x(1) + 3*% x(2)} 一 18:; 
f(4)= -x(1)— x(2); 
£f(5)= x(1) + x(2)} — 8; 


在 MATLAB 命令 行 窗 口 输入 下 列 代 码 : 


x0 = [0.1; 0.1]; 名 提 供 解 的 初 值 
[x, fval|] = fminimax((®@exl6 15,x0) 


经 过 7 次 运 代 以 后 ,结果 如 下 : 


二 
4.0000 
4.0000 
下 Trail 一 
0.0000 — 64.0000 一 2. 0000 一 日 .DODODO — 00.0000 


【 例 16-16】 定位 问题 。 设 某 城 市 有 某 种 物品 的 10 个 需求 点 ,第 i 个 需求 点 P; 的 坐 
标 为 (a; ,bi) ,道路 网 与 坐标 轴 平 行 , 彼 此 正 交 。 现 打算 建 一 个 该 物品 的 供应 中 心 , 旦 由 于 
受到 城市 某 些 条 件 的 限制 ,该 供应 中 心 只 能 设 在 工 界 于 [5.8j」、y 界 于 15.8 | 的 范围 内 。 问 
该 中 心 应 建 在 何人 处 为 好 ? 

P; 太 的 坐标 为 : 

ai:2 1 5 9 3 1]2 6 20 18 11 

bp:: 109 13181 3 5 1 fe b 

设 供应 中 心 的 位 置 为 (xz,w) :要求 它 到 最 远 需 求 点 的 距离 尽 可 能 小 。 由 于 此 处 应 来 
用 沿 道 路 行走 的 距离 ,可 知 用 户 P; 到 该 中 心 的 距离 为 | zx 一 a;| 十 |y 一 bi|。 

由 有 题 意 ,代码 设置 如 下 ,并 保存 在 ex16_16.m 文件 中 : 


function f = exl6 16(x) 

和 输入 各 个 点 的 坐标 值 

a= [2 1 5 9 3 12 6 20 18 11|]; 
b=[1i0 9 13 i8 1 3 ™y 8 G6]; 
f(1) = abs(x(1) -a(l1)) + abs(x(2) — b(1)); 
f(2) = abs(x(1) -a(2)) +abs(x(2) - b(2)); 
f(3) = abs(x(1) -a(3)) +abs(x(2) — b(3)); 
f(4) = abs(x(1) —- a(4)) +abs(x(2) — b(4)); 
E(5) = abs(x(1) -a(5})) +abs(x(2) - b(5)); 
f(6) = abs(x(1)— a(6)) +abs(x(2) — b(6)); 
£f(7) = abs(x(1) -a(7)) +abs(x(2) - b(7)); 
£f(8) = abs(x(1)— a(8)) +abs(x(2) — b(8)); 
f(9) = abs(x(1)— a(9)) +abs(x(2) — b(9)); 
f(10) = abs(x(1) -a(10)})} +abs(x(2) — b(10)):; 


[= 了 
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在 MATLAB 命令 行 窗口 输入 下 列 代码 : 


A 多 提供 解 的 初 值 
AA=[—10 
1 0 
0 —1 
0 11: 
bb=[ -5;8; -5;8]; 
[x, fval] = fminimax((@exl6_ 16, x0, AA, bb) 


计算 结果 如 下 : 
有 
8.0000 
7.0000 
ETL 
9.0000 9.0000 9.0000 12.0000 11.0000 8. 0000 4.0000 12. 0000 
11.0000 4.0000 


可 见 ,在 限制 区 域内 的 东北 角 设 置 供应 中 心 , 可 以 使 该 点 到 各 需求 点 的 最 大 距离 最 
小 。 最 大 最 小 距离 为 8 个 距离 单位 。 


本 章 小 结 


本 章 主要 介绍 了 MATLAB 中 的 优化 工具 箱 , 包 括 优化 工具 箱 中 的 函数 .最 小 化 问 
题 .线性 规划 问题 .无 约束 非 线 性 规划 问题 .二 次 规划 问题 有 约束 最 小 化 问题 .目标 规划 
问题 及 最 大 最 小 化 问题 等 。 这 些 最 优化 问题 在 MATLAB 中 都 可 以 找到 相应 的 函数 ,用 
户 可 以 参考 每 个 小 节 中 的 函数 功能 描述 及 相应 示例 。 

在 解决 优化 问题 时 ,首先 ,要 根据 实际 情况 抽象 出 一 个 数学 模型 ; 其 次 ,要 弄 清 楚 模 
型 是 否 有 限制 条 件 或 约束 ,同时 还 要 搞 清楚 目标 函数 是 否 是 线性 的 ; 最 后 ,利用 相应 优化 
函数 有 针对 性 地 解决 实际 问题 。 最 优化 方法 的 发 展 很 快 ,现在 已 经 包含 多 个 分 支 ,如 线 
性 规划 ,整数 规划 、 非 线性 规划 .动态 规划 、 多 目标 规划 等 。 由 于 篇 幅 所 限 , 这 里 仅仅 讨论 
了 一 些 常 见 的 规划 问题 。 


本 革 主 要 介绍 有 关 解 仿 微 分 方程 的 工具 箱 。 解 仿 微 分 方程 在 数 
学 和 物理 学 中 应 用 广泛 ,理论 丰 亡 。 但 是 ,很 多 理工 科 的 和 学生, 特别 是 
工程 人 员 往 往 为 仿 微 分 方程 的 复 淋 求解 而 朱 涉 。 本 革 的 目的 是 让 用 
户 在 学 会 偏 微 分 方程 理论 以 后 ,能 够 从 容 地 上 手 解 决 几 类 和 营 见 的 、 实 
用 的 偏 微 分 方程 ,从 而 提高 自己 的 工作 效率 。 同 时 ,不 用 考虑 底层 算 
法 的 构建 ,只 震 通 过 GUI 轻松 几 步 操作 就 能 完成 复杂 的 侦 微 分 方程 求 


解 过 程 。 
学 习 目 标 : 


。 熟悉 偏 微分 方程 工具 箱 中 常用 函数 ; 
。 掌握 利用 GUI 求解 椭圆 方程 ; 

。 掌握 利用 GUI 求解 抛物 线 方程 

。 掌握 利用 GUI 求解 双 曲 线 方程 ; 

。 掌握 利用 GUI 求解 特征 值 方程 。 


17.1 仿 微 分 方程 工具 箱 简 介 


在 命令 行 窗 口中 输入 pdetool, 和 窗口 打开 进入 工作 状态 。 提 供 两 种 
解 方程 的 方法 : 一 种 是 通过 函数 ,利用 了 晴 数 可 以 编程 ,也 可 以 用 命令 行 
的 方式 解 方程 ,因数 及 功能 如 表 17-1 所 示 ; 另 一 种 是 对 窗口 进行 交互 


操作 。 


adaptmesh 
assemb 
assema 
assempde 
hyperbolic 
parabolic 
pdeeig 
pdenonlin 


poisolv 


偏 微 分 万 程 党 用 函数 


功 能 
生成 目 适 应 网 格 及 但 微分 方程 的 解 
生成 边 寞 质量 和 刚度 矩阵 
生成 积分 区 域 上 的 质量 和 刚度 矩阵 
组 成 俩 微分 方程 的 刚度 宅 阵 
求解 双 曲 线 型 偏 微分 方程 
求解 抛物 线 型 偏 微 分 方程 
求解 特征 型 偏 微 分 方程 
求解 非 线 性 型 微分 方程 
利用 和 窍 阵 格式 快速 求解 泪 松 方程 


Ea 
羡 
人 个 
得 改 
分 
方 
程 
1 
且 
入 
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pdeellip 画 椭 回 

pdecirc 画 | 圆 

pdepoly 画 和 多边形 

pderect 夯 短 形 

csgchk 检查 几何 矩阵 的 有 效 性 
initmesh 产生 最 初 的 三 角形 网 格 
pdemesh 画 仿 微分 方程 的 三 角形 网 格 
pdesurf 画 表 面 图 命令 


一 般 来 说 ,用 函数 解 方程 比较 烦琐 ,而 通过 窗口 交互 操作 比较 简单 。 解 方程 的 全 前 
过 程 及 结果 都 可 以 输出 保存 为 文本 文件 ,限于 本 文 的 篇 幅 , 这 里 主要 介绍 交互 操作 解 偏 
微分 方程 的 方法 。 


1. 确定 待 解 的 偏 微分 方程 


使 用 卫 数 assempde 可 以 对 待 解 的 俩 微分 方程 加 以 描述 。 在 交互 操作 中 ,为 了 方便 
用 户 ,把 常见 问题 归结 为 几 个 类 型 :可 以 在 窗口 的 工具 栏 上 找到 选择 类 型 的 弹出 菜单 ,这 
些 类 型 如 下 : 

(1) 通用 问题 。 

(2) 通用 系统 (二 维 的 偏 微分 方程 组 )。 

《3) 平面 应 力 。 

(4) 结构 力学 平面 应 变 。 

5) 也 全 

(6) 静 磁 学 。 

(7) 交流 电 电 磁 学 。 

《8) 直流 电导 电介质 。 

《9) 热传导 。 

(10) 扩散 。 

确定 问题 类 型 后 ,可 以 在 PDE Specification 对 话 框 中 输入 c.a、f.d 等 系数 (函数 )， 
这 样 束 确定 了 每 解 的 仿 微 分 方程 。 


2. 确定 边界 条 件 


使 用 孙 数 assemb 可 以 摘 述 边界 条 件 。 用 pdetool 提供 的 边界 条 件 对 话 框 ,在 对 话 框 
里 输入 gg 等 边界 条 件 。 


3. 确定 偏 微分 方程 所 在 域 的 几何 图 形 
可 以 用 MATLAB 的 次数 夯 出 2 域 的 几何 图 形 , 如 pdeellip 一 一 面 椭圆 ; 
pderect 一 一 夯 和 矩形 ; pdepoly 一 一 夯 多 边 形 。 也 可 以 用 鼠标 在 pdetool 的 画图 窗 中 直接 画 


出 0Q 域 的 几何 图 形 。pdetool 提供 了 了 类似 于 明 数 那样 男 加 椭圆 、 和 矩 形 、 多 边 形 的 工具 ， 
无 论 哪 种 画 法 ,图 形 一 经 男 出 ,pdetool 就 为 这 个 图 形 目 动 取 和 名 ,并 把 代表 图 形 的 省 


字 放 人 Set formula 窗口 。 在 这 个 窗口 中 ,可 以 实现 对 图 形 的 拓扑 运算 ,以 便 构 造 复 灯 的 
QQ 域 几何 图 形 ， 


4. 划分 有 限 元 


对 域 进行 有 限 元 划分 的 函数 有 initmesh( 基 本 划分 ) 和 refinemesh( 精 细 划 分 ) 等 。 
在 pdetool 窗口 中 直接 单 击 划分 有 限 元 的 按钮 划分 有 限 元 ,划分 的 方法 与 上 面 的 肯 
数 相 对 应 。 


5。 解 方程 
经 过 前 4 步 之 后 就 可 以 解 方程 了 了 。 解 方程 的 图 数 有 adaptmesh 


解 方程 的 通用 肯 
Hr ; poisolv - 算 形 有 限 元 解 椭 圆 型 方程 ; parabolic -和 解 抛物 线 型 方程 ; hyperbolic 
解 双 曲线 型 方程 。 

在 pdetool 窗口 中 直接 单 击 解 方程 的 按钮 即 可 解 方程 。 解 方程 所 耗费 的 时 间 取 诀 于 
有 限 元 划分 的 和 多少。 


17.2 求解 椭圆 方程 


在 偏 微 分 方程 中 ,有 类 特殊 的 椭圆 曲线 方程 ,; 即 泊 松 方程 ;下面 介 绍 一 个 这 类 问题 的 
示例 请 读者 参考 ，。 

【 例 17-1】 求解 在 域 2 上当 松 方 程 一 AU 一 1、 边 界 条 件 3Q2 上 U 王 0 的 数值 解 , 其 中 
2 是 一 个 单位 图 。 

(1) 启动 pdetool 界面 。 在 MATLAB 命令 行 窗 口中 输入 pdetool, 按 Enter 键 弹出 一 个 
PDE Teol 对 话 框 ,然后 画 一 个 单位 圆 ,并 单 击 | 9 图 标 , 弹 出 如 图 17-1 所 示 的 界面 。 


| 另 | POE Toolbom - [Untied] 一 口 计 


图 17-1 pdetool 界面 
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(2) 选择 Boundary 一 Specify boundary conditions 命令 ,将 边界 条 件 选 中 为 Dirichlet 
条 件 并 设置 h= 二 1,r 二 0, 如 图 17-2 所 示 。 


二 | Boundary Condition 一 | 面 | WE 


图 17-2 边界 条 件 设置 界面 


(3) 单 击 PDE 按钮 ,将 会 弹出 一 个 如 图 17-3 所 示 的 对 话 框 。 选 中 Elliptic 单 选 按钮 
并 设置 “一 1,4a 一 0， 太 一 10。 


| PDE Specification 一 口 x | 


图 17-3 设置 偏 微分 方程 类 型 
(4) 划分 单元 。 单 击 三 角 按 钮 会 |, 弹出 如 图 17-4 所 示 的 对 话 框 。 继 续 单 击 双 三 角 


按钮 ,弹出 如 图 17-5 所 示 的 对 话 框 ， 


国 PDE Tealtem - [Untitlad| 
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图 17-4 划分 三 角 网 格 
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(6) 对 比 精确 解 的 绝对 误差 值 。 选 择 Plot 一 Parameters 命令 ,弹出 选择 框 ,如 图 17-7 
所 示 :在 Property 下 选择 User entry 选项 ,并 在 其 中 输入 方程 的 精确 解 ww (1-zx.^2-y.“^2)/4， 
单 击 Plot 按钮 ,弹出 如 图 17-8 所 示 的 绝对 误差 图 。 


| Plot Selection 一 口 A ] 


图 17-7 ”选择 框 
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图 17-8 绝对 误差 图 


(7) 选择 File->Save as 命令 ,选择 一 个 文件 存放 路 径 。 最 后 ,将 结果 保存 为 M 文件 
即 ell. my: 代码 如 下 所 示 :以 后 运行 此 例 时 在 MATLAB 命令 行 窗 口中 执行 即 可 。 


function pdemodel 

[pde fig,ax| = pdeinit; 
pdetool('appl cb',1)}); 

set(ax, 'DatahspectRatio', [1 1 11):; 


set ( ax, ' PlotBoxAspectRatio ' , |[ 921. 


39999999999998 ] ) ; 

set(ax, 'XLimMode', 'auto'); 
set(ax, "YLim’',[ — 1.5 1.51); 
set(ax, 'XTickMode', 'auto' ); 
set(ax, 'YTickMode', 'auto' ); 
pdetool( 'gridon', 'on'); 

各 几何 描述 


3239999999999991 


614. 


39999999999998 614. 


pdeellip( 一 0.00081433224755711464, 一 0.0024429967426706778, 0.99429967426710109， 


1.001628664495114， 
上 区 1 


set(findobj(get(pde fig, Children')，Tag'， 'PDEEval’'), 'String’', 'El') 


入 边界 条 件 
pdetool( 'changemode',0) 
pdesetbd(4, 
dr", 

1, 

1 1 

1 ') 
pdesetbd(3, 
"dir", 

1, 

1 

10') 
pdesetbd(2, 
"dir", 

1, 

上 1 

1 上 ) 
pdesetbd(1, 
"dir", 

1, 

宁 下 

'O') 


和 网 格 生成 
setappdata(pde fig, 'Hgrad',l1.3); 


setappdata(lpde fig, 'refinemethod', 'regular'); 


setappdata(pde fig, 'jiggle', char( 'on', 'mean', '')); 


pdetool('initmesh') 
pdetool( 'ref ine') 


种 偏 微分 方程 的 系数 
pdeseteq(1, 

"Th 

.0 
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11.0', ... 
1.0, 

0: 10, . 

'O0.0', .B 

10.017，… 

LO 100]') 

setappdata(lpde fig, 'currparam', … 
DT 0 

'O.0'; … 

.077 … 

0" 1 


当 求 解 参 数 

setappdata(pde fig, 'solveparam', … 
str2mat('0','1620', '10', 'pdeadworst', … 
0.51 1 Longest' 0, "J]E— 4','', 'fixed', 'Inf')) 


第 Plotflags 和 用 户 数 据 的 字符 串 

setappdata(pde fig, 'plotflags',[411111110001100001]); 
setappdata(pde fig, 'colstring', u— (1— x.*2— y.*2)/4'); 
setappdata(pde fig, 'arrowstring', ''):; 

setappdata(pde fig, 'deformstring', ''); 

setappdata(pde fig, 'heightstring', ''); 


名 求解 偏 微分 方程 
pdetool( 'solve') 


17.3 求解 抛物 线 方 程 


下 面 介绍 一 类 特殊 的 抛物 线 方程 , 即 热 方程 ,请 用 户 参考 以 下 示例 。 
【 例 17-2〗 求 在 一 个 矩形 域 2 上 的 热 方程 d 乳 一 Ax 一 ,边界 条 件 为 : 在 左边 界 上 


wx 一 100 ,在 右边 界 上 到 一 一 10, 在 其 他 边界 上 到 一 0, 其 中 口 是 一 个 矩形 尺 , 与 矩形 Rs 的 


差 ,Ri 为 [一 0.5,0.5]X[ 一 0. 8,0.8],R; 为 [一 0.05,0.05]X[ 一 0.4,0.4]。 

(1) 局 动 pdetool 界面 。 在 MATLAB 命令 行 窗 口中 输入 pdetool, 按 Enter 键 弹出 
一 个 PDE Tool 对 话 框 。 选 择 Options 一 Application 一 Generic Scalar 命令 ,如 图 17-9 所 
,然后 选中 Grid 之 后 于 选中 Grid Spacing 修改 网 格 尺 度 ,如 图 17-10 所 示 。 

(2) 夯 答 形 区 域 。 选 择 Draw 一 Rectangle/ square 傅 令 , 团 民 和民: 并 且 分 别 单 击 坐 
标 系 中 的 Ri 与 KR; 图 标 设 置 其 大 小 ,具体 内 容 如 图 17-11 和 图 17-12 所 示 。 最 后 在 Set 
formula 交 本 框 中 输入 Rl 一 RR,. 

(3) 边界 和 条件。 选择 Edit 一 Select All 命令 ,并 选择 Boundary 一 Specify boundary 


conditions 命令 ,将 边界 条 件 选 为 Neumann 条 件 , 设 置信 一 0。 然后 分 别 单 击 最 左 侧 边 界 
和 最 右 侧 边界 ,按照 要 求 设置 边界 条 件 。 
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图 17-9 选择 Generic Scalar 命令 


] 国 Object Dialog = | 


图 17-11 人 设置 Ri 


] 国 ouea Dislog = | 


图 1]7-12 设置 RR 


(4) 设置 方程 类 型 。 由 于 热 方程 是 特殊 的 抛物 线 方程 .所 以 选中 Parabolic 单 选 按钮 
并 设置 c 一 1.0,a 一 0.0,f 一 0,d 一 1.0, 如 图 17-13 所 示 。 

(5) 设置 时 间 。 选 择 Solve 一 Solve Parameters 命令 ,然后 设置 时 间 , 并 将 u(to) 设 置 
成 0.0, 其 他 不 变 , 如 图 17-14 所 示 。 

(6) 求解 热 方程 。 单 击 等 号 按钮 ,弹出 如 图 17-15 所 示 的 对 话 框 ,显示 出 求解 方程 值 
的 分 布 。 

(7) 选择 File->Save as 命令 ,选择 一 个 文件 存放 路 径 。 最 后 ,将 结果 保存 为 M 文件 
即 par. m ,代码 如 下 所 示 , 以 后 运行 此 例 时 在 MATLAB 命令 行 窗 口中 执行 即 可 。 
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图 17-13 设置 偏 微分 方程 类 型 


二 | Solve Parameters ”一 画 | A 


图 17-15 热 方程 数值 解 的 分 布 


function pdemodel 

[pde fig,ax| = pdeinit; 

pdetool('appl cb',1); 
pdetool( 'snapon', 'on' ); 广 
set(ax, 'DataAspectRatio', [1 9.25 1]); 程 
set(ax, 'PlotBoxAspectRatio', [1 0.66666666666666663 1]); 
set(ax, "XLim',[ —111):; 箱 
setlax, "YLim"',[ ~—= 1.5 1.5])s 

set(ax, "XTick',[ 一 1.5， 


I 
一 0.050000000000000003， 
0, 
0.050000000000000003，, 
0. 35. 
1, 
| 
] ); 
set(ax, "YTick',[ —1, 
一 0.80000000000000004 ， 
一 0.59999999999999998 ， 
一 0.39999999999999991 ， 
一 0.19999999999999996 ， 
0, 
0.19999999999999996， 
0. 39999999999999991 ， 
0. 59999999999999998 ， 
0.80000000000000004, 
1, 
] ); 
setappdata(ax, 'extraspacex','— 0.05 0.05'):; 
pdetool( 'gridon', 'on').; 


当 几何 描述 

pderect([ -0.50.50.80000000000000004 一 0.80000000000000004],'R1'); 
pderect([ -0D0.050000000000000003 0.050000000000000003 0. 40000000000000002 
一 0.40000000000000002 1，'R2 0) ; 
set(findobj(get(pde fig, Children') 'Tag', EDEEVval') 'String', 'Rl1 一 R2 1) 


和 边界 条 件 
pdetool( 'changemode',0) 
pdesetbd(8, 
‘Neu', 

1, 

'01, 

101) 
pdesetbd( 7 ， 
meu " ， 

1, 

10 1， 

"Or" 
pdesetbd(6, 
"dir", 
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setappdatal(lpde fig, 'solveparam', … 
str2mat('0','1308', "10', ‘pdeadworst', ... 
0.5, "longest', 0, "JE 4d',"', "fixed’, "Inf"'})) 


当 Plotflags 和 用 户 数据 的 字符 串 

setappdata(pde fig, 'plotflags',[1 1111111000111000011); 
setappdata(pde fig, 'colstring', ''); 

setappdata(pde fig, 'arrowstring', ''); 

setappdata(pde fig, 'deformstring', ''); 

setappdata(pde fig, 'heightstring', ''); 


和 当 求 解 偏 微分 方程 
pdetool('solve') 


17.4 求解 双 曲 线 方程 


粳 


下 面 介绍 一 类 特殊 的 双 曲 线 方程 , 即 波动 方程 ,请 用 户 参 考 以 下 示例 。 


【 例 17-3】 求解 在 矩形 域内 的 波动 方程 2 关 一 Ax 一 0, 在 左 \ 右 边界 wx 一 0, 在 上 \ 下 边 


9 _ | EE dul(to) ,, 加 
界 人 一 0, 另外 ,要 求 有 初 值 w (wo) 与 ,这 里 从 + 一 0 开始 ,那么 w(0) 一 


f/x 9u(0) 村 i 
atan (cos > ) ,从 而 a =3sin(xr)e 


《1) 局 动 pdetool 界面 。 在 MATLAB 命令 行 窗 口中 输入 pdetool, 控 Enter 键 弹出 
一 个 PDE Tool 对 话 框 。 然 后 选择 Options 一 Generic Scalar 命令 。 

(2) 男 和 矩形 区 域 。 和 选择 Draw 一 Rectangle/sqguare 命令 ;看 Rj: (一 1,， 一 1), (一 1,1)， 
(人 1 一 1)41L1)。 

(3) 边界 和 条件。 分 别 选 中 上 .和 下 边界 ,选择 Boundary 一 Boundarvy Mode 一 Specify 
Boundary Conditions 命令 ,将 边界 条 件 设 置 为 Neumann 条 件 , 按 照 要 求 设置 边界 条 件 ， 
如 图 17-16 所 示 。 然 后 分 别 单 击 左 边界 和 右边 界 , 按 照 要 求 设 置 边 界 和 条件; 如 图 17-17 
所 示 。 


二 Boundary Condition 一 口 这 


图 17-16 Neumann 条 件 
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二 | Bound ary Condition 一 口 ] 2 


图 17-17 ” Dirichlet 条 件 


(4) 设置 方程 类 型 。 由 于 波动 方程 是 特殊 的 双 曲 线 方程 ,所 以 选中 Hyperbolic 单 选 
按钮 并 设置 c 王 1.0,a 一 0.0, 太一 0.0,d 一 1.0, 如 图 17-18 所 示 。 


二 PDE Specification = 品 了 


图 17-18 设置 偏 微 分 方程 类 型 


(5) 设置 时 间 和 参数。 选择 Solve 一 Solve 
Parameters 命令 ,然后 在 Time 下 输入 linspace (0,5， 


看 | Solve Parameters ”一 口 诚 


Time- 
’ 31) ,在 u(to) 下 输入 atan(cos(pi/2 <* x), 在 ww (to) 下 linspace (0.5.31) 
| 输入 3 x sin(pix 工 ). x exp(sin(pi/2 x* y)) ,其 他 不 变 ， uaor 


如 图 17-19 所 示 。 Ca 

(6) 动画 效果 图 。 选 择 Plot-Parameters 命令 ， | 5 | 

弹出 如 图 17-20 所 示 的 对 话 框 。 选 中 Animation 复 se 
选 框 ,然后 单 击 Options 按钮 ,弹出 如 图 17-21 所 示 | 


oo 


: 的 对 话 框 。 选 中 Replay movie 复 选 框 , 单 击 OK 按 Absoiute tolerance 
”。 ” 钮 后 ,弹出 一 个 动态 图 像 ,如 图 17-22 所 示 。 oo 

\ (7) 求 波动 方程 。 在 图 17-20 所 示 的 对 话 框 中 
”取消 选中 Animation 复 选 框 ,然后 单 击 Plot 按钮 , 弹 


出 如 图 17-23 所 示 的 对 话 框 ,显示 出 求解 方程 值 的 ”图 17-19 Solve Parameters 对 话 框 
分 布 。 

(8) 选择 File~Save as 命令 ,选择 一 个 文件 存放 路 径 。 最 后 ,将 结果 保存 为 M 文件 
即 hyp. m; 代 码 如 下 所 示 , 以 后 运行 此 例 时 在 MATLAB 命令 行 窗 口中 执行 即 可 。 


和 


图 17-21] Animation Options 对 话 框 
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图 17-22 动态 图 像 
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图 17-23 波动 方程 数值 解 的 分 布 


function pdemodel 
[pde fig,ax| = pdeinit; 
pdetool( 'appl cb',1); 
set(ax, "DataaspectRatio' [1 1.5 11); 
set(ax, "PlotBoxAspectRatio', [1.5 1 11); 
set(ax, 'XLim',[ — 1.5 1.5]); 
set(ax, "YLim',[— 1.5 1.5]); 
set(ax, 'XTickMode', 'auto' ); 
set(ax, "YTick',[ -1.2, . 
ST 
— 0.79999999999999993,，… 
0.59999999999999987,， … 
一 0.39999999999999991， … 
— 0.19999999999999996,， … 
0 = 
0.19999999999999996,， … 
D0. 3999999999999999]1,， … 
0.59999999999999987,， 
0. 79999999999999993,， … 
I 
] ) ; 


第 几何 描述 
pderect([—111 -1],'R1'); 
set(findobj(get(pde fig, 'Children'), 'Tag 


', "PDEEval'), 'String', 'R1') 


T 一 一 


ten = 


读 三 三 


-------- MATLAB 科 学 计算 


和 Plotflags 和 用 户 数 据 的 字符 串 

setappdata(pde fig, 'plotflags',[1111111110131100001]); 
setappdata(pde fig, 'colstring', ''); 

setappdata( pde fig, 'arrowstring', ''); 

setappdata(pde fig, 'deformstring', ''); 

setappdata(pde fig, 'heightstring', ''); 

和 求解 偏 微分 方程 

pdetool( 'solve') 


17.5 求解 特征 值 方程 


下 面 介绍 特征 值 方程 的 求解 过 程 ,请 用 户 参 考 以 下 示例 。 
【 例 17-4】 计算 特征 值 小 于 100 的 特征 方程 
— Au = Au 
其 中 求解 区 域 在 工 形 上 ,拐角 点 分 别 是 (0,0),( 一 1,0),( 一 1, 一 1),(1, 一 1),(1,1) 
和 (0,1) ,并 且 边 界 条 件 为 wx 一 0。 
(1) 启动 pdetool 界面 。 在 MATLAB 命令 行 窗口 中 输入 pdetool, 按 Enter 键 弹 出 
一 个 PDE Tool 对 话 框 。 然 后 选择 Options 一 Generic Scalar 命令 。 
(2) 夯 上 多 边 形 区 域 。 选 择 Draw 一 Rectangle/square 命令 ; 夯 Ri 与 R,: (0,0)， 
C1 000—1 一 50010 一 A121 和 05351) 如 图 17-24 所 未。 
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图 17-24 工 形 区 域 


(3) 边界 条 件 。 选 择 Boundary 一 Specify Boundary Conditions 命令 ,将 边界 条 件 选 开 
为 Dirichlet 条 件 ,按照 要 求 设置 边界 条 件 ,如 图 17-25 所 示 。 


和 Boundary Condition 本 站 | 万 


图 17-25 边界 条 件 设置 


(4) 设置 方程 类 型 。 选 择 Eigenmodes 单 选 按钮 ,并 设置 c 二 1.0,4a 王 0.0,d 二 1.0, 如 
图 17-26 所 示 。 


本 ppE Specification 


图 17-26 方程 类 型 设置 


(5) 设置 特征 值 范围 。 选 择 Solve-=Parameters 命令 ,然后 输入 [0 100], 如 图 17-27 
所 示 。 


二 Solve parameters = 口 A | 


图 17-27 范围 设置 


(6) 求解 特征 方程 。 单 击 等 号 按钮 ,弹出 如 图 17-28 所 示 的 对 话 框 ,显示 出 求解 方程 
值 的 分 布 。 

(7) 选择 File->Save as 命令 ,选择 一 个 文件 存放 路 径 。 最 后 ,将 结果 保存 为 M 文件 
即 Eig. mm,; 代 码 如 下 所 示 , 以 后 运行 此 例 时 在 MATLAB 命令 行 窗口 中 执行 即 可 。 
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[本 PDE Toolbox - [Untitled] 


Ele Edrt OQptions Draw Boundary PDE Mesh soke Blot 府 DWW) Help 


口 | 田 | 咏 BI 如 |poe| 洛 | 会 | = |= 埃 | 名 | Generc scaer 


Lambdal1 9.9528 Color: u 


图 17-28 特征 方程 的 解 


function pdemodel 

[pde fig,ax|] = pdeinit; 

pdetool( 'appl chb',1); 

set(ax, 'DataAspectRatio', [1 1.2 1]):; 
set(ax, 'PlotBoxAspectRatio', [1.5 1 1]); 
set(ax, "XLim',[ — 1.5 1.5])， 

set(ax, 'YLim',[—1 1.3999999999999999 ] ) ; 
set(ax, 'XTickMode', 'auto' ): 

set(ax, 'YTickMode', 'auto' ); 


和 几何 描述 

pderect([—110 -1],'R1'); 

pderect([011 -0],'R2').; 

set(findobj(get(pde fig, Children') 'Tag', 'PDEEval'), 'String', 'R1 + R2') 


竺 边界 条 件 

pdetool( 'changemode',0) 
pdesetbd(”7, 

"dlr", 

1, 

"1, 

'0') 

pdesetbd(6 ，… 


| 
以 
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"1.0 ']) 


入 求解 参数 

setappdatal(lpde fig, 'solveparam', … 
str2mat('0', 1000', '10', ‘pdeadworst' , ... 
0.51， ' Jongest', '0, "1E— 4','', 'fixed’', 'Inf')) 


多 Plotflags 和 用 户 数 据 字 符 串 

setappdata(pde fig, 'plotflags',[111111110001100001]); 
setappdata(pde fig, 'colstring', ''); 

setappdata(pde fig, 'arrowstring', ''); 

setappdata(pde fig, 'deformstring', ''); 

setappdata(pde fig, 'heightstring', ''); 


和 求解 偏 微分 方程 
pdetool( 'solve') 


用 户 可 以 依照 以 上 所 举 示例 ,根据 自己 的 不 同 需 求 修改 边界 条 件 、 求 解 区 域 和 方程 
参数 。 当 然 ,可 视 化 操作 虽然 简单 方便 ,但 并 不 灵活 。 用 户 也 可 以 根据 自己 的 能 力 通过 
数值 计算 方法 (如 有 限 差 分 法 ) 来 编写 自己 的 代码 ,还 可 以 选择 工具 箱 中 的 File 一 Save as 
命令 保存 成 M 文件 ,用 户 可 以 自己 参看 代码 。 


本 章 小 结 


伙 所 周知 : 解 俩 微分 方程 不 是 一 件 轻松 的 事情 ,但 是 伺 微 分 方程 在 目 人 然 科 尝 和 工程 
领域 应 用 很 三, 因此 :人 研 究 解 俩 微分 方程 的 方法 ,以 及 开发 解 俩 微分 方程 的 工具 ,是 数学 
和 计算 机 领域 中 的 一 项 重要 工作 。 

本 章 主 要 是 针对 工程 人 员 ,特别 是 涉及 偏向 分 方程 的 数值 解法 及 工程 应 用 而 编 与 
的 。 本 和 曹 的 主要 思想 是 通过 具体 . 侧 单 的 示例 来 概括 俩 微分 方程 的 数值 结 有 末 , 从 结构 安 
排 上 上 分别 介绍 了 4 类 第 见 的 人 禹 微分 方程 在 交互 式 界 面 上 的 操作 方法 ,并 且 将 这 些 操 作 进 
一 步 转化 为 MATLAB 语言 。 


